r - R中的“lda”建模

Question

我正在尝试根据癌症 Recurrence(R) 或 Non-Recurrence(NR) 训练我的基因表达数据。我正在处理的数据集：

dim(all_C) [1] 87 11

87个样本和10个基因（一列称为“条件”，表明每个样本是R或NR。我使用了这些命令：

trainset <- sapply(unique(all_C$Condition), function (S) sample(which(all_C$Condition==S), 20))

trainset <- as.numeric(trainset)

table(all_2[trainset, "Condition"])

testset <- setdiff(seq(87),trainset)

any(testset %in% trainset)

library(MASS)

model.lda <- lda(all_C[trainset,-11] , grouping = all_C[trainset,11] )

predict.lda <- predict(model.lda , all_C[testset, 1:10])

但我得到这个错误：

FUN(x, aperm(array(STATS, dims[perm]), order(perm)), ...) 中的错误：二进制运算符的非数字参数

请你帮帮我好吗？