data a;
input people $ pay_amount pay_month Gender$ @;
datalines;
A 10 1 M
A 5 3 M
A 6 4 M
B 2 4 F
B 1 2 F
B 10 5 F
;
run;
proc sort data=a;
by people pay_month;
run;
proc transpose data=a out=a1(drop=_name_) prefix=pay_month;
var pay_amount;
id pay_month;
by people gender;
run;