有错别字,应该trControl
是tcControl
. 并且当参数提供为 时tcControl
,caret
将其传递给 rpart 并引发错误,因为此选项永远不可用。
我想这回答了您的问题,即当您尝试在训练中进行交叉验证时为什么会出现此错误。
以下是它应该如何工作:
library(caret)
library(mosaicData)
data(HELPrct)
ds = HELPrct
fitControl= trainControl(method="repeatedcv",times=5)
ds$sub = as.factor(ds$substance)
rpartFit1 <- train(homeless ~ female + i1 + sub + sexrisk + mcs + pcs,
trControl=fitControl,
method = "rpart",
data=ds[complete.cases(ds),])
rpartFit1
CART
117 samples
6 predictor
2 classes: 'homeless', 'housed'
No pre-processing
Resampling: Cross-Validated (10 fold)
Summary of sample sizes: 105, 105, 105, 106, 105, 106, ...
Resampling results across tuning parameters:
cp Accuracy Kappa
0.00000000 0.5280303 -0.03503032
0.01190476 0.5280303 -0.03503032
0.07142857 0.5977273 -0.02970604
Accuracy was used to select the optimal model using the largest value.
The final value used for the model was cp = 0.07142857.