等高线在x和y的每个组合处都需要单个z。

Question

Warning message:
Computation failed in `stat_contour()`:
Contour requires single `z` at each combination of `x` and `y`. 

为什么我的以下代码有错误？我只想使用logit模型绘制边界。

library("ISLR")
glm1 <- glm(default ~ balance, data=Default, family=binomial())
summary(glm1)

    Default$glm_prob <- predict(glm1, newdata=data.frame(balance=Default$balance), type="response")
    default_plot <- ggplot() + geom_point(data=Default, aes(x=balance, y=default, color=default), size=4) + 
      scale_color_manual(values=c("green", "red")) + theme_bw()
default_plot
glm1.contour <- default_plot + stat_contour(
      data=Default, aes(x=balance, y=default, z=glm_prob), breaks=c(0.7))
    glm1.contour

Answer 1

Default $ balance [which.min（abs（glm1 $ fitted.values-0.7））]＃决策边界