I want to try and predict the confidence intervals for a glm poisson() distribution. I tried to use the predict function to extract the upper and lower limits..but it dosent' appear to work. Any suggestions on what I could change?
temp <- rnorm(100,20,2)
plant <- rnorm(100,5,1.5)
df <- data.frame(temp, plant)
mod <- glm(plant~temp + I(temp^2), df, family = poisson)
predicted.plant <- predict(mod, type = "response")
predict(predicted.plant, interval="confidence", level=.95)