proc format;
value typefmt 1='$groupx'
2='$groupy'
3='$groupz';
value $groupx 'positive'='agree'
'negative'='disagree'
'neutral'='notsure ';
value $groupy 'positive'='accept'
'negative'='reject'
'neutral'='possible';
value $groupz 'positive'='pass '
'negative'='fail'
'neutral'='retest';
run;
data answers;
length word $ 8;
input type response $;
respfmt = put(type, typefmt.);
word = putc(response, respfmt);
datalines;
1 positive
1 negative
1 neutral
2 positive
2 negative
2 neutral
3 positive
3 negative
3 neutral
;


雷达卡




京公网安备 11010802022788号







