※ 引述《clansoda (小笨)》之铭言：
idx <- c(1, 3, 5) #假设你要1、3、5这三个variables
my_formula <-
as.formula(paste("Classkd ~ ", paste(colnames(training.data)[idx],
collapse = "+")))
剩下来的就是把你的logistic function里面的formula改成上面这个就好了

对的，做法只是一个概念，还是要依照资料做变化不知道你的new是什么东西因为我是用colnames来抓的

我觉得又是" Age " 中的space造成错误的

那你要不要把你的colnames修正一下呢?colnames(training.data) <- trimws(colnames(train.data))因为手上也没有你的data，有时候作业系统也会有影响如果还是not work，就拿大绝招出来training.data %>% select(c(1, 3, 5))直接这样做配上.来选你的model也可以，只是丑一点而已

我觉得这题就干脆用删掉法比较快