*
* Graphs from page 795, section 21.1
*
cal(q) 1970
open data table21-1.prn
data(format=prn,org=columns) 1970:1 1991:4
*
graph(key=upleft,vlabel="Billions of 1987 dollars") 3
# gdp
# pdi
# pce
graph(key=upleft,vlabel="Billions of 1987 dollars") 2
# profits
# dividends