r - 使用混淆矩阵找到截止值？

Question

n<-1 
a<-as.vector(length(s))
for (i in s ) {

  print(i)
  test$result<-ifelse(test$pred>i,1,0)
  a[n]<-confusionMatrix(test$result,test$churn,positive = "1")$overall[2]

  print(n)
  n=n+1
}
max(a)

如果我运行代码，我如何获得上述范围之间的阈值，我得到这个错误

错误：（$<-.data.frame，*tmp*“结果”，值 = 逻辑（0））：替换有 0 行，数据有 3892

标签： rvariable-assignmentr-caretconfusion-matrix

Answer 1

试试test$result[[i]]<-ifelse(test$pred[[i]]>i,1,0)。我认为这就是您收到该错误的原因，但我无法重现该错误