1.在R语言中,使用 Chickweight 数据进行预测 进行5倍的交叉验证,重复抽样1000,用 Tme,Chck和成De预测 Weight
2.比较 GLM,RRM 以及 LASSO 模型的预测准确率。
3.讨论结果并说出自己的推测。
## 在R语言中,使用ChickWeight数据进行预测
## 进行5倍的交叉验证,重复抽样1000次,用Time,Chick 预测weight
## 比较GLM,RRM以及LASSO模型的预测正确率
## 加载R包caret
library(caret)
set.seed(123)
## 设置repeats = 5 ,5倍的交叉验证 number = 1000, 重复抽样1000次
ctrl <- trainControl(repeats = 5,number = 1000)
## names(getModelInfo()) 查询 train函数中的模型
## GLM
model1 <- train(weight ~ Time + Chick ,data = ChickWeight,
method = "glm",trControl = ctrl)
## RRM
model2 <- train(weight ~ Time + Chick ,data = ChickWeight,
method = "ridge&