matrix al = (.27, .09 ,-.01 \ .10, -.06, -.13 \ -.04 ,-0.17, -0.30)
plotmatrix, mat(al) split(-.4(0.05).4) ///
freq formatcells(%6.2f) ///
legend(title("Wear and tear" "(allostatic load)") ///
col(1) ///
order(1 "Less wear and tear" 5 "Average" 8 "More wear and tear") ) ///
xlabel(1 "Working" 2 "Intermediate" 3 "Higher") ///
ylabel(0 "Working" -1 "Intermediate" -2 "Higher") ///
xscale(alt) yscale(rev) ///
xtitle(Participant's social class) ///
ytitle(Parental class) ///
note(" " "Numbers denote the average allostatic load in that group. The overall average across all classes is 0 (SD = 1)", span)
