请帮忙。我已经设法使用以下方法将相当不错的非线性回归曲线拟合到我的数据中:
model2 <- nls(urine~a*(1-exp(-c*water)), data = eagle, start = list(a=550, c=0.00385))
然后我使用以下方法生成我的情节:
av <- seq(0,1200, 0.5)
bv <- predict (model2, data=eagle, list(water=av))
plot (urine~water, data = eagle)
lines (av,bv)
我想为上下 95% 置信区间画一些虚线。我已经设法为我的线性回归分析编写代码,但我正在努力应对当前的非线性回归。以下代码:
a <- predict (model2, newdata=data.frame(water=av), interval="confidence")
对于线性回归,这给了我一个数据框,其中包含适合、lwr 和 upr 的三列。使用我的非线性回归,它只会给我一个我无法做任何事情的数字列表。有什么建议么?有没有一种简单的方法来获得非线性回归的上限和置信线?