助けてください。以下を使用して、かなり適切な非線形回帰曲線をデータに適合させることができました。
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")
線形回帰の場合、これにより、fit、lwr、upr の 3 つの列を持つデータフレームが得られます。私の非線形回帰では、何もできない数値のリストが表示されます。助言がありますか?非線形回帰の上限線と信頼線を取得する簡単な方法はありますか?