datasets

[BrahmanandaRao]

1. data in;
   infile datalines dlm='09'x;
   input id 1 num 3-4;
   datalines;
   2 12
   3 45
   3 74
   5 33
   5 12
   5 15
   ;
   run;
   
   
   
   I want output 
   
   

   ID	Num
   2	12
   3	45,74
   5	33,12,15

   i

[PeterClemmensen]

data in;
infile datalines dlm='09'x;
input id 1 num 3-4;
datalines;
2 12
3 45
3 74
5 33
5 12
5 15
;

data want(drop=oldnum);
   set in(rename=(num=oldnum));
   length num $100;
   by id;
   num=catx(',', num, oldnum);
   if first.id then num=oldnum;
   retain num;
run;

proc print data=want;
run;

[BrahmanandaRao]

---

@BrahmanandaRao wrote:

1. data in;
   infile datalines dlm='09'x;
   input id 1 num 3-4;
   datalines;
   2 12
   3 45
   3 74
   5 33
   5 12
   5 15
   ;
   run;
   
   
   
   I want output 
   
   

   ID	Num
   2	12
   3	45,74
   5	33,12,15

   i

---

Hi dear

but i got output like below

Obs id num123456

2	12
3	45
3	45,74
5	33
5	33,12
5	33,12,15

[PeterClemmensen · Accepted solution]

Ah, sorry. Missed a statement. There u go 🙂

data in;
infile datalines dlm='09'x;
input id 1 num 3-4;
datalines;
2 12
3 45
3 74
5 33
5 12
5 15
;

data want(drop=oldnum);
   set in(rename=(num=oldnum));
   length num $100;
   by id;
   num=catx(',', num, oldnum);
   if first.id then num=oldnum;
   if last.id then output;
   retain num;
run;

proc print data=want;
run;