R中的飞跃包返回“可变长度不同”错误

Question

我使用的是leaps包中的R运行regsubsets ：

a <- regsubsets(in_var~paste(predictors,collapse="+"),data=x,nbest=10,matrix=T)

并得到一条错误消息：

Error in model.frame.default(data = x, matrix = T, formula = rating ~  : variable lengths differ (found for '(matrix)')

（请注意，无论我是否手动复制预测变量列表都没有区别）。

我刚刚尝试了态度数据集，例如：

data(attitude)
attitude <- na.omit(attitude)
regsubsets(rating~.,data=attitude,nbest=10,matrix=T)

并得到相同的错误。 我的数据集是相似的，但是具有更多的变量，并且in_var是1-3分（在其他地方，我将其折叠为二进制，然后可以对其进行逻辑运算）。 不知道我在这里问statistics question还是R问题...

一些问题（例如，model.frame.default中的Error ......可变长度不同 ； R中可变长度不同 ）解决了这个问题，但是我已经在数据帧上做了na.omit，所以我不应有任何缺失值导致矢量不均匀。

Answer 1

这有效：

a <- regsubsets(y=as.matrix(x[c("in_var")]),x=as.matrix(x[c(predictors)]),nbest=10)

大概的问题是， regsubsets需要一个matrix （不是df）