impCoda(x, maxit = 10, eps = 0.5, method = "ltsReg", closed = FALSE,
init = "KNN", k = 5, dl = rep(0.05, ncol(x)),
noise=0.1, bruteforce=FALSE)
closed
equals TRUE)noise
.
method impKNNa
, isomLR
data(expenditures)
x <- expenditures
x[1,3]
x[1,3] <- NA
xi <- impCoda(x)$xImp
xi[1,3]
s1 <- sum(x[1,-3])
impS <- sum(xi[1,-3])
xi[,3] * s1/impS
Run the code above in your browser using DataLab