I am trying to evaluate forecasts from a BVAR for multiple alternative values for the tightness parameters. A hypothetical example of what I'm doing derived from the canmodel.rpf is below:
Code: Select all
procedure runtheil
option choice type 1 symmetric general
option rect matrix
option vector mvector
option real tightness .1
option real other .5
option string window
*
local integer time
*
system(model=canmodel) ;*<<<<<<<
variables logcangdp logcandefl logcanm1 logexrate can3mthpcp logusagdp ;*<<<<<<<<
lags 1 to 4 ;*<<<<<<<
det constant
specify(tightness=tightness,type=type,matrix=matrix,mvector=mvector) other
end(system)
*
theil(model=canmodel,setup,steps=12,to=2006:4) ;*<<<<<<<
estimate(noprint) * 1998:4 ;*<<<<<<<
theil
do time=1999:1,2006:3 ;*<<<<<<<
kalman
theil
end do time
theil(dump,window=window)
end
*
***********************************************************************
comp draw=10
do j = 1,draw
@runtheil(tightness=j,other=.001,window="Tight(j)")
end do jMy question is whether it is possible to extract the Theil's U for each forecast step in the @runtheil, or can it just be sent to an output window? I would ultimately have numerous tightness combinations that I would hope to evaluate and if this output was in memory and not just printed it would be helpful.
Thanks!