泊松回归线

Question

如何在绘图中添加泊松回归线？我尝试了以下，但abline函数不起作用。这是因为abline（）使用截距和斜率，而泊松回归线使用对数链接。

x = rpois(12, 5) 
plot(x, axes = F)
axis(1,at=1:length(month.name), labels = month.name)
axis(side = 2)
y = c(1:12)
poislm = glm(x~y, family=poisson)
abline(poislm)

Answer 1

from R-help

怎么样？

predProbs<-predict(poislm,data.frame(y=seq(min(y), max(y), length.out=100)), type="response")
lines(seq(min(y), max(y), length.out=100), predProbs, col=2, lwd=2)