※ 引述《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也可以，只是醜一點而已

我覺得這題就乾脆用刪掉法比較快