R でシグモイド成長モデルを使用して、将来の収益を予測しようとしています。モデルは次のようになります。
Y = a/( 1+ce^(-bX) ) + noise
私のコード:
x <- seq(-5,5,length=n)
y <- 1/(1+exp(-x))
plot(y~x, type='l', lwd=3)
title(main='Sigmoid Growth')
プロットを描くことはできましたが、将来の値を取得する方法がわかりません。次の 6 年間の収益値を予測したいとします。