options formdlim='-' pageno=min nodate; DATA Sol(TYPE=CORR); INPUT _TYPE_ $ _NAME_ $ SES IQ NACH GPA; cards; CORR SES 1.000 0.300 0.410 0.330 CORR IQ 0.300 1.000 0.160 0.570 CORR NACH 0.410 0.160 1.000 0.500 CORR GPA 0.330 0.570 0.500 1.000 N . 50 50 50 50 PROC REG; Figure_1_GPA: MODEL GPA = SES IQ NACH; Figure_1_nACH: MODEL NACH = SES IQ; Figure_6: MODEL GPA = IQ NACH; run; DATA Lotus(TYPE=CORR); INPUT _TYPE_ $ _NAME_ $ F_EDUC F_OCCUP SIBS EDUC OCCUP INCOME; cards; CORR F_EDUC 1.0000 0.5300 -.2871 0.4048 0.3194 0.2332 CORR F_OCCUP 0.5300 1.0000 -.2476 0.4341 0.3899 0.2587 CORR SIBS -.2871 -.2476 1.0000 -.3311 -.2751 -.1752 CORR EDUC 0.4048 0.4341 -.3311 1.0000 0.6426 0.3759 CORR OCCUP 0.3194 0.3899 -.2751 0.6426 1.0000 0.4418 CORR INCOME 0.2332 0.2587 -.1752 0.3759 0.4418 1.0000 N . 50 50 50 50 50 50 PROC REG; A: MODEL INCOME = F_EDUC F_OCCUP SIBS EDUC OCCUP; B: MODEL OCCUP = F_EDUC F_OCCUP SIBS EDUC; C: MODEL EDUC = F_EDUC F_OCCUP SIBS; TITLE 'Path Analysis from Figure 7.'; run;