Transpose?

[ywon111]

Any suggestion best way to get this?

HAVE:

id	fruit
1	apple
1	orange
2	apple
3	apple

WANT:

id	fruit
1	apple, orange
2	apple
3	apple

Thanks 🙂

[ywon111]

Sorry, slight changes, this is what I want

id	apple	orange
1	1	1
2	1
3	1

Thanks 

[Kurt_Bremser · Accepted solution]

Create a variable, and then use it in the TRANSPOSE:

data have;
input id $ fruit $;
datalines;
1 apple
1 orange
2 apple
3 apple
;

data pretrans;
set have;
val = 1;
run;

proc transpose
  data=pretrans
  out=want (drop=_name_)
;
by id;
id fruit;
var val;
run;