r - 用虚拟变量预测 linearRidge

Question

我正在尝试使用下面的代码和库中的 GenCont 数据进行岭回归ridge

library(ridge)
data(GenCont)
GenCont_df <- as.data.frame(GenCont)
GenCont_df$SNP1 <- as.factor(GenCont_df$SNP1)
mod2 <- linearRidge(Phenotypes ~ SNP1+SNP2, data = GenCont_df)
predict(mod2, GenCont_df, na.action = na.pass, all.coef = FALSE,scaling ="scale")

但是如果我在模型中使用虚拟变量，我会得到这个错误

Error in X[, ll] : subscript out of bounds

有没有办法在 R 中预测 Ridge 回归中的虚拟变量？