轮廓需要在“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

默认$ balance [which.min（abs（glm1 $ fitted.values - 0.7））] #decision boundary