使用train时出错：选择了未定义的列

问题描述

我查看了有关此问题的其他已发布问题，但未能成功使我的代码正常工作。@H_404_1@

这是我的代码：@H_404_1@

library(titanic)  
library(caret)
library(tidyverse)
library(rpart)

# 3 significant digits
options(digits = 3)

# clean the data
titanic_clean <- titanic_train %>%
  mutate(Survived = factor(Survived),Embarked = factor(Embarked),Age = ifelse(is.na(Age),median(Age,na.rm = TRUE),Age),# NA age to median age
         FamilySize = SibSp + Parch + 1) %>%    # count family members
  select(Survived,Sex,Pclass,Age,fare,SibSp,Parch,FamilySize,Embarked)

index <- createDataPartition(titanic_clean$Survived,times = 1,p = 0.2,list = FALSE)
test_set <- titanic_clean[index,]
train_set <- titanic_clean[-index,]

caret::train(train_set$Survived ~ train_set$fare,method="glm",data=train_set)

train函数返回以下错误：@H_404_1@

Error in `[.data.frame`(data,all.vars(Terms),drop = FALSE) : 
  undefined columns selected

有什么想法吗？@H_404_1@

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）