one question about proc transpose...

i have the following data set:
people pay_amount pay_month Gender
A                  10                1         M
A                   5                 3         M
A                   6                 4         M
B                   2                 4         F
B                   1                 2         F
B                  10                 5         F
...
I want to do a transpose and get the final data set as:
people  Gender pay_month1 pay_month2 pay_month3 pay_month4 pay_month5 ...
A             M          10                                         5                     6
B              F                                 1                                          2                 10
...

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;

Thanks a lot. But the final output the payment month was arranged in mon1 mon3 mon4 mon2 ....is there a way we can arrange it by month? 2# xiaoxiahu0571

%macro aa(n);
        proc sql;
        create table a2 as
        select
        people,gender,
        %do i=1 %to &n.;
                        pay_month&i.,
        %end;
"abc" as tmp
from a1;
quit;
%mend;
%aa(5);
那个transpose里貌似没办法改，，除非第一组A是按照1、2、3、4、5来排序，还有个比较笨的办法先加一组变量，分别为1、2、3、4、5,然后排序后转置就是那个结果了，求高手

I know we can print it out in order like: var month1-month100, and save it 2 excel. but i don't know how to save it as a sas data set...

5# rockfido

1. 
   
2. data have;
   
3. keep people gender mon:;
   
4. array mon(100);
   
5. do until(last. people);
   
6.   set had; by people notsorted;
   
7.   mon(pay_month) = pay_amount;
   
8. end;
   
9. run;

复制代码