再接再厉 新手报道前来学习

data demo_data;
length id 3 a1-a5 b1-b4 8;
input id a1-a5 b1-b4;
datalines;
1 0 0 0 0 5 0 0 0 4
2 0 0 0 4 0 0 0 3 0
3 0 0 3 0 0 0 2 0 0
4 0 2 0 0 0 1 0 0 0
5 1 0 0 0 0 0 0 0 0
;

data array;
set demo_data;
array a(*) a1 - a5 ;
array b(*) b1 - b4 ;
retain a_upper 5 b_upper 4;

if id <=a_upper then ar = a(a_upper-id+1);
if id <= b_upper then br= b(b_upper-id+1);
run;

本人智商比较低。。。没看懂。。问题。帮顶

非常赞！很强大！