Сформулировать данные для rpart

Question

Объединить столбцы имя списка, чтобы подготовить формулу для rpart?

Просто хотел объединить имена (log_data), log_data - это список из 60 векторов различных векторов, поэтому я просто хочу, чтобы их имена столбцов были в формате, чтобы я мог поместить их в формулу rpart в r ... .. как rpart(A ~ B + C + D + E ,log_data), поэтому здесь я просто хочу извлечь formula = "A ~ B + C + D + E" как целую строку, где A, B, C, D, E - это имя столбцов, которое мы должны извлечь из log_data, или есть лучший способ получить дерево из списка.
Я попытался,

a <- names(log_data) 
rpart(a[1] ~ a[2] + a[3] + a[4], log_data) 

получаю ошибку

Error in paste(temp, yprob[, i], sep = " ") : subscript out of bounds 

где

a[2] 

[1] "X.u.crpice..vin20f1..vol.vin20f1v1.r_credit_credshare2...91...90." 

a[3] 

[1] "X.u.crpice..vin20f1..vol.vin20f1v1.r_credit_credshare2...92...90." 

c<-paste(a[1], "~", sep="") 

rpart_formula <- as.formula(paste(c, paste(a[2:60], collapse = " + "), sep = "")) 

rpart(rpart_formula,log_data) 

это происходит в бесконечном цикле на rpart только потому, что слишком длинное имя столбца или может быть п = 60

Могу ли я прикрепить любые названия колонок colnames (log_data) < - c (?), что я должен поставить на «?», Так что будет легко рисовать его для n = 60.

Answer 1

Я считаю, что вы хотите

shortnames <- paste0("c",seq(ncol(log_data))) 
names(log_data) <- shortnames 
form <- reformulate(paste(shortnames[2:4],collapse="+"), 
        response=shortnames[1]) 
rpart(form,log_data)