PCA - Biplot - IA I para Redução de Dimenção
data imc_dat;
input cat $ imc corr kcal;
cards;
AT 20.65 53.55 3150.???
SEM 23.1 16.45 2950
SE 25.8 2.55 2650
PR 25.4 2.1 2650
;
proc print;
run;
title "PCA - Biplot - Com Medianas";
/*data imc_dat;
input cat $ imc corr kcal; */
proc prinqual data=imc_dat plots=(MDPref)
/* project onto Prin1 and Prin2 */
; /* use COV scaling */
transform identity(imc corr); /* identity transform */
id cat;
ods select MDPrefPlot;
run;
