Displaying 1 result from an estimated 1 matches for "rrestr10".
2007 Apr 05
2
about systemfit
...lt;environment: namespace:car>
but when I type "ftest.systemfit", I do see the actual code. Why?
Anyway, here are the results in more detail:
eqns<-list(eq = y ~ trend+ x1 + x[,1] + x[,2] + x[,3] + x[,4] + x[,5] + x[,6] + x[,7] + x[,8] + x[,9] + x[,10] + x[,11] + x[,12] + x[,13]
Rrestr10<-matrix(0,10,16);Rrestr10[1,16]=Rrestr10[2,15]=Rrestr10[3,14]=Rrestr10[4,13]=Rrestr10[5,12]=Rrestr10[6,11]=Rrestr10[7,10]=Rrestr10[8,9]=Rrestr10[9,8]=Rrestr10[10,7]=1
adfResc<-systemfit(method="OLS",eqns=eqns,R.restr=Rrestr10)
adfResu<-systemfit(method="OLS",eqns=eqns...