transpose data wihtout using transpose proc

[rvsidhu035]

*45.Transpose the above dataset without using proc transpose. ;
data new30;
Input id   sysbp diabp;
array dum(3) id sysbp diabp;
do i=1 to 3;
new=dum(i);output;end;

Cards;
001 130 80
002 110 90
003 140 70
004 120 80
005 130 70
;run;

_name_ 001 002 003 004 005
Sysbp 130 110 140 120 130
Diabp 80 90 70 80 70

[PaigeMiller]

We don't do your homework for you. That's not the purpose of this forum. You need to try to do this yourself, and see if you can get the code to work. If you can't get the code to work, we can probably figure out how to fix it.