变元就是名字,名字出错的话,没有贴出程序和数据,实在没有办法判断问题出在哪里
不过,SeqKNN里面有这样一个例子,可以对照判断下——
data(khan05)
x <- as.matrix(khan05)
N <- dim(x)
p <- N[2]
N <- N[1]
nas <- is.na(drop(x %*% rep(1, p)))
xcomplete <- x[!nas, ] ## complete set
xbad <- x[nas, , drop = FALSE] ## incomplete set
xnas <- is.na(xbad)
xbadhat <- xbad
xbadhat[1,]<-nnmiss(xcomplete, xbad[1,], xnas[1,], 10)