ROCR中的预测误差“；预测和标签的交叉验证运行次数必须相等。”；

我试图使用预测功能，但有一个是不允许我使用它

pred <- predict(decision_tree, test_data, type = "prob") 

head(pred)
head(my_data)
tail(pred)
tail(test_data$Income)
pred <- prediction(pred, test_data$Income)
evalu <- performance(pred, "acc")

pred <- predict(decision_tree, test_data, type = "prob") 

head(pred)
head(my_data)
tail(pred)
tail(test_data$Income)
pred <- prediction(pred, test_data$Income)
evalu <- performance(pred, "acc")

---

嗨，我希望你在这期间工作过。对于所有正在搜索答案的其他人： 简而言之：只需在行后添加一个[，2]：

---

普雷德你好，马提亚。欢迎来到S.O！谢谢你的回答。能否请您对其进行编辑，以便从问题的全面解决方案开始？链接到外部源代码可能会有所帮助，但在没有任何外部引用的情况下，答案应该是有意义的。您可以添加反勾号（`）以格式化内联代码。例如，`2+2`变为

2+2

。最后，请删除严格不必要的文本，如“问候Matthias”和“我希望你在这段时间内工作过”。这些观点在这里受到欢迎和鼓励，但答案一般应限于内容严格的信息。这一点一开始可能会让人觉得有点奇怪，但你会习惯的——这正是我们用来确保信息正式且可访问的风格。想象一下，你写的东西更像是一本百科全书，而不是一封电子邮件。再次感谢你。这是一个很大的贡献。虽然这个链接可以回答这个问题，但最好在这里包含答案的基本部分，并提供链接供参考。如果链接页面发生更改，则仅链接的答案可能无效-

Error in prediction(pred, test_data$Income) : 
  Number of cross-validation runs must be equal for predictions and labels.