myControl <- trainControl(method='cv', number=5)
caretList(
Sepal.Length ~ Sepal.Width,
head(iris, 50),
methodList=c('glm', 'lm'),
trControl=myControl
)
caretList(
Sepal.Length ~ Sepal.Width,
head(iris, 50), methodList=c('lm'),
tuneList=list(
nnet=caretModelSpec(method='nnet', trace=FALSE, tuneLength=1)
),
trControl=myControl
)
Run the code above in your browser using DataLab