Displaying 1 result from an estimated 1 matches for "szenariosw5".
Did you mean:
szenarios
2006 Mar 27
1
Missing Argument in optim()
Hello everybody,
i already searched the archieves, but i still don't know what is wrong
in my implementation, mybe anybody coud give me some advice
ll1<-function(rho,theta,beta1,beta2,beta3,beta4,t,Szenariosw5,Testfaellew5,X1,X2)
{
n<-length(t)
t<-cumsum(t)
tn<-t[length(t)]
Szenn<-Szenariosw5[length(Szenariosw5)]
Testn<-Testfaellew5[length(Testfaellew5)]
X1n<-X1[length(X1)]
X2n<-X2[length(X2)]
n/rho-(tn^theta)*(beta1*Szenn+beta2*Testn+bet...