r - 厨师距离情节如何摆脱传说

Question

假设这个简单的例子：

> numberofdrugs <- rpois(84, 5)
> healthvalue <- rpois(84, 75)
> test <-glm(healthvalue ~ numberofdrugs, family=poisson)
> plot(test, which=5)

有谁知道，如何摆脱说明厨师距离的红色虚线图例？

Answer 1

我不知道您是否可以摆脱那条线，但您可以简单地手动创建该图。之后，您可以添加所有您想要或不想要的图例。例如，看看boot包装。

在你的情况下，这将做你的情节

plot(y = glm.diag(test)$rp, x = glm.diag(test)$h)

据我所知，还有一个glm.diag.plots功能。看看他们的帮助页面。

Answer 2

有一个cook.levels参数可以控制产生虚线的数量和值。它的长度也用于if导致产生图例的分支的语句中。因此，如果您将值设置为NULL您摆脱虚线和图例。您可能还想通过设置删除实线红线add.smooth=FALSE。

plot(test, which=5, cook.levels=NULL, add.smooth=FALSE)

编辑

在问题评论中建议仅删除图例之后，编辑副本plot.lm似乎是要走的路。这个问题提供了一种有效但略显深奥的方法，使用body：

plot.lm2 <- plot.lm
body(plot.lm2)[[27]][[3]][[9]][[4]][[8]][[3]][[6]]<-NULL
plot.lm2(test, which=5)