【发布时间】:2021-05-13 16:28:53
【问题描述】:
我正在尝试在 r 中制作 QDA 模型。我的模型代码如下,模型有效(它对训练数据进行预测并创建一个有效的混淆矩阵。
Model3=qda(TARGET_FLAG~KIDSDRIV+PARENT1+MSTATUS+CAR_USE+TIF+CAR_TYPE
+CLM_FREQ+REVOKED+MVR_PTS+ URBANICITY +SQRT_TRAVTIME +SQRT_BLUEBOOK+SQRT_INCOME
+EDUCATION+JOB, data = train)
Model3
summary(Model3)
summary(Model3)
predmodel.train.qda = predict(Model3, data=train)
table(Predicted=predmodel.train.qda$class, TARGET_FLAG=train$TARGET_FLAG)
predmodel.test.qda = predict(Model3, newdata=modtest)
table(Predicted=predmodel.test.qda$class, TARGET_FLAG=modtest$TARGET_FLAG)
Model3=qda(TARGET_FLAG~KIDSDRIV+PARENT1+MSTATUS+CAR_USE+TIF+CAR_TYPE
+CLM_FREQ+REVOKED+MVR_PTS+ URBANICITY +SQRT_TRAVTIME +SQRT_BLUEBOOK+SQRT_INCOME
+EDUCATION+JOB, data = data)
Model3Prediction <- predict(Model3, type = "response")
data$Model3Prediction=Model3Prediction$class
confusionMatrix(data$Model3Prediction, data$TARGET_FLAG)
这会产生所需的效果,但是当我将模型应用于测试数据时,我收到以下错误:
“$<-.data.frame(*tmp*, P_TARGET_FLAG, value = list(class= c(1L, :
替换有2行,数据有2141"
test$P_TARGET_FLAG <- predict(Model3, newdata = test, type = "response")
如何让模型预测我的测试数据的价值?
【问题讨论】:
标签: r machine-learning model