'en el argumento se pone la serie que se desea analizar
'se devuelven los modelos eqxy donde x denota el n?mero de t?rminos
'autorregresivos e y denota el n?mero de t?rminos de promedios m?viles,
'as?, por ejemplo eq00 es regresi?n en constante
'eq22 es un arma(2,2)
'eq30 es un ar(3) etc.
'devuelve una tabla para cada criterio de informaci?n para seleccionar el m?n.
equation eq00.ls {%0} c
%ar=""
for !i=1 to %1
%ar = %ar+"ar("+@str(!i)+")"
equation eq!i0.ls {%0} c {%ar}
next
%ma=""
for !i=1 to %1
%ma=%ma+"ma("+@str(!i)+")"
equation eq0!i.ls {%0} c {%ma}
next
%ar = ""
for !j=1 to %1
%ar = %ar +" ar(" +@str(!j) +")"
%ma = ""
for !i=1 to %1 
   %ma = %ma +" ma(" +@str(!i) +")"
   equation eq!j!i.ls {%0} c {%ar} {%ma}
next
next
table(%1+1,%1+1) schwic
for !i=0 to %1
for !j=0 to %1
schwic(!i+1,!j+1)=eq!j!i.@schwarz
next
next
table(%1+1,%1) akaic
for !i=0 to %1
for !j=0 to %1
akaic(!i+1,!j+1)=eq!j!i.@aic
next
next
table(%1+1,%1+1) hqic
for !i=0 to %1
for !j=0 to %1
hqic(!i+1,!j+1)=eq!j!i.@hq
next
next
'show schwic
show akaic
'show hqic