Displaying 1 result from an estimated 1 matches for "rpart_train".
2007 Apr 16
1
My First Function: cryptic error message
...labels = cbind("Control","ADHD" ))
cbs38s <- as.formula(paste("adhdcbin ~",
paste(names(probands[grep("cbs38_..*",names(probands))]),
collapse = "+")))
# fitting the rpart model
rpart_training <- rpart(cbs38s,
data = training,
method = "class")
X11 (); plot(rpart_training);text(rpart_training)
rpart_training.bagged <- bagger(length = 100, formula = cbs38s, training)
X11 (); plot(rpart_training.bagged);text(rpart_training....