*
* Neural network example 4.8 from pp 181-183
*
open data ch04_ibm_m(26-99).txt
calendar(m) 1926
data(format=free,org=columns) 1926:01 1999:12 ibmln
set d = ibmln>=0.0
*
clear nnfore
nnlearn(rsquared=.10,iters=100000,hidden=4,save=nnmodel) * 1997:12
# ibmln{1 to 4} d{1 to 4}
# d
*
nntest 1998:1 1999:12 nnmodel
# ibmln{1 to 4} d{1 to 4}
# nnfore
graph
# nnfore
print 1998:1 1999:12 d ibmln nnfore