*
* Example from pp 96-97
*
open data hsales.dat
calendar(m) 1973
data(format=free,org=columns) 1973:1 1995:11 hsales
*
filter(type=flat,span=7)  hsales / ma7
filter(type=flat,span=12) hsales / ma12
*
graph(footer="7 MA smoother") 2
# ma7
# hsales
graph(footer="Centered 12 MA smoother") 2
# ma12
# hsales