У меня есть тренировочный набор с переменной ответа ViolentCrimesPerPop, и я намеренно подгоняю большое дерево регрессии с контролем
control1 <- rpart.control(minsplit=2, cp=1e-8, xval=20)
train_control <- rpart(ViolentCrimesPerPop ~ ., data=train, method='anova', control=control1)
, затем яиспользуйте его для прогнозирования тестового набора
predict1 <- predict(train_control, newdata=test)
, однако я не уверен, как рассчитать среднеквадратичную ошибку тестового набора, поскольку для него требуется переменная ответа ViolentCrimesPerPop, которая не являетсядано в тестовом наборе.Может кто-нибудь дать мне подсказку о том, как подойти к этой проблеме?