2011-06-05 66 views
2

的假設這個簡單的例子:廚師距離情節如何擺脫傳說

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

有誰知道,如何擺脫紅色的虛線傳說它說廚師的距離是多少?

+0

你不能;這個圖例的存在是在'plot()'方法中硬編碼的。 @mropa建議你自己創造情節是一條路。 – 2011-06-05 15:19:52

+1

您也可以在不使用'()'的情況下在'R控制檯中鍵入'plot.lm'來查看函數的內部結構。我會用這個作爲你自己定製廚師距離圖功能的基礎。 – Chase 2011-06-06 00:45:59

+0

謝謝我查閱了代碼,但找不到編碼的區域。 – user734124 2011-06-06 08:30:32

回答

2

我不知道你是否可以擺脫那條線,但你可以簡單地手動創建該圖。之後,您可以添加您想要或不想要的所有圖例。 例如看看boot包。

在你的情況,這會做你的情節

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

據我知道有一個glm.diag.plots功能以及。看看他們的幫助頁面。

0

有一個cook.levels參數控制生成虛線​​的數量和值。它的長度也用於導致產生圖例的分支的if表述。因此,如果將該值設置爲NULL,則可以擺脫虛線和圖例。您可能還想通過設置add.smooth=FALSE刪除純紅線。

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

編輯

後的問題評論說只有傳說是被刪除,編輯的plot.lm副本的建議似乎是要走的路。這question給出了一個有效的,儘管這樣做的稍微深奧,方式,以便使用body

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