캐럿::기차 값지 아니하느

Question

내가 하려고 돌 값을 전달하여"knnImpute"하는 전처리의 인수가 캐럿의 열차()메소드가 있습니다.다음 예제에 따라,그것은 나타납니다 값지 아니하느 남아있으로 나는 무시됩니다.무엇이 잘못된 것입니까?

모든 도움이 많이 감사합니다.

library("caret")

set.seed(1234)
data(iris)

# mark 8 of the cells as NA, so they can be imputed
row <- sample (1:nrow (iris), 8)
iris [row, 1] <- NA

# split test vs training
train.index <- createDataPartition (y = iris[,5], p = 0.80, list = F)
train <- iris [ train.index, ]
test  <- iris [-train.index, ]

# train the model after imputing the missing data
fit <- train (Species ~ ., 
              train, 
              preProcess = c("knnImpute"), 
              na.action  = na.pass, 
              method     = "rpart" )
test$species.hat <- predict (fit, test)

# there is 1 obs. (of 30) in the test set equal to NA  
# this 1 obs. was not returned from predict
Error in `$<-.data.frame`(`*tmp*`, "species.hat", value = c(1L, 1L, 1L,  : 
  replacement has 29 rows, data has 30

업데이트:나는 할 수 있었을 사용한 전처리 기능에 직접 돌리는 값입니다.나는 여전히 이해하지 않는 이유하지 않는 것에서 발생하는 기차 기능입니다.

# attempt to impute using nearest neighbors
x <- iris [, 1:4]
pp <- preProcess (x, method = c("knnImpute"))
x.imputed <- predict (pp, newdata = x)

# expect all NAs were populated with an imputed value
stopifnot( all (!is.na (x.imputed)))
stopifnot( length (x) == length (x.imputed))

Answer 1

보 ?predict.train:

 ## S3 method for class 'train'
 predict(object, newdata = NULL, type = "raw", na.action = na.omit, ...)

가 na.omit 여기에는 너무:

 > length(predict (fit, test))
 [1] 29
 > length(predict (fit, test, na.action = na.pass))
 [1] 30

Max