以下のような非線形回帰があります。
y_t= (シータ) sum(((1-シータ)^k) (x_(tk))) + アルファ * (ガンマ-z_t)
x_t と z_t は独立変数であり、theta と alpha と gamma はパラメーターです。パラメータを推定するために、次の再帰関数を書きました。
w_t<-function(theta,x,t){
s<-0
for (i in 0:(t-1)){
s<- s + theta * (x[t-i])*((1-theta)^i)
}
return(s)
}
シータ値を知って回帰モデルの最初の文を計算します。このモデルのシータやその他のパラメータを推定するにはどうすればよいですか?