Thanks!
Code: Select all
for %y y1 y2 y3 y4 y5 y6 y7 y8
for !n=1 to 5
%reg=""
%thresh="t1 t2 t3 t4 t5"
for !power=0 to 3
equation lt_!n_{%y}
for !lnlag=1 to 7
%new=@word(%thresh,!n)
%reg=%reg+%y+"("+@str(-!lnlag)+")"+"*"+%new+"^"+@str(!power)+" "
next
next
lt_!n_{%y}.ls {%y} c {%reg}
'Wald test
%wald=""
for !m=9 to 29
%wald=%wald+"c("+@str(!m)+")="
next
lt_!n_{%y}.wald {%wald}0
next
next