load ChristianFig1.dat
load k.dat
t   = ChristianFig1(:,1);
gdp = ChristianFig1(:,5);
tot = ChristianFig1(:,2);
mkt = ChristianFig1(:,3);
nmkt= ChristianFig1(:,4);
fa= k(:,2);

plot(t,mkt./gdp,t,nmkt./gdp,t,fa./gdp)
legend('Market Human Capital/GDP','Nonmarket Human Capital/GDP', ...
       'Fixed Assets Plus Durables/GDP')
axis([1994,2006,0,50])
