Proc sort data=PICT; by year;
Proc means data=PICT mean stddev;
by year;
proc corr data=pict plots=all;
var PVfin_des PVini ADPVgral CMSt CMS_PV HCW FT AOB FAT LEAN L_LM a_LM b_LM FC14d FC3d FC7d
Ctotal Cinsol IFM LS PG pH_24h pH_3h VE_1;
title 'Computing factor scores';
proc factor data=PICT
SIMPLE
METHOD=PRIN
PRIORS=ONE
NFACT=3
ROUND
FLAG=.50
out=solucion1
outstat=solucion2
score
;
var PVfin_des PVini ADPVgral CMS_PV HCW FT AOB L_LM a_LM b_LM FC14d FC3d FC7d
Ctotal Cinsol IFM LS PG pH_24h pH_3h VE_1;;
run;