- data one;
- input att $ jun $ shi $ lve $ tuan $ ying $ lian $ pai $;
- att = catx('|',ifc(att = '姓名',1,2),att);
- cards;
- 姓名 李明 . 张亮 . . . 王娜
- 性别 男 . 男 . . . 女
- 姓名 . 张三 李四 王五 . . .
- 性别 . 女 男 男 . . .
- 姓名 李湘 . . . . . .
- 性别 女 . . . . . .
- ;
- run;
- proc sort data = one out = two;
- by att;
- quit;
- proc transpose data = two out = three;
- by att;
- var jun shi lve tuan ying lian pai ;
- run;
- proc sort;
- by _name_ att;
- quit;
- data want;
- set three;
- rename _name_ = vars;
- attrib _all_ label = '';
- att = scan(att,2,'|');
- run;
复制代码提个建议,你下次用表格的形式直接在帖子中展现下,这样很直观