发帖
雷达卡
以下是我用crossval写的一个程序
library(bootstrap)
library(MASS)
data <- read.table("E:/exercise13_197701138.txt")
x <- array(0,c(2947,26))
for(i in 1:26){x[,i] <- data[,i]}
y <- data[,27]
##LDA
theta.fit <- function(x,y){lda(x,y)}
theta.predict <- function(fit,x){predict(fit,x)$class}
results <- crossval(x,y,theta.fit,theta.predict,ngroup=10)
results$cv.fit
其中x是predictor variables，y是binary response variable。为什么出来的预测结果都是1和2呢？不是应该还是0，1变量吗？
京公网安备 11010802022788号
