r - xj[i] : invalid subscript type 'list' 中出现错误

Question

我尝试将数据(银行)拆分为训练数据和测试数据。但我不知何故遇到了下面的错误。我该如何解决这个问题？

train = bank[1:100, ]
test = bank[!train,]
Status.test =Status[!train]
glm.fit=glm(Status~Length+Right+Bottom+Top+Diagonal,data=bank,family=binomial,subset=train)

#Error in xj[i] : invalid subscript type 'list'

glm.probs=predict(glm.fit,test,type="response") 
glm.pred=rep("genuine",100)  
glm.pred[glm.probs>.5]="counterfeit"
table(glm.pred,test)##classification on training data

#Error in table(glm.pred, test) : all arguments must have the same length

Answer 1

问题出在 subset=train 中。根据?glm。 子集应该是一个向量，而不是原始数据集的子集:

subset an optional vector specifying a subset of observations to be used in the fitting process.

因此，您可能需要将代码更改为:glm.fit=glm(Status~Length+Right+Bottom+Top+Diagonal,data=train,family=binomial)

或

glm.fit=glm(Status~Length+Right+Bottom+Top+Diagonal,data=bank,family=binomial,subset=1:100)