sas追问3

数据第一步已经变成如下的形式：


城市  区域       板块                               规交1      
上海  宝山  大华板块              7号线,737,738,11号线,58,78
上海  嘉定  嘉定新城板块         3号线,嘉环二线,11号线

现在要变成如下形式：

城市  区域       板块          规交1     规交2      规交3     规交4     规交5   规交6    规交条数
上海  宝山  大华板块         7号线    737          738       11号线    58        78       6
上海  嘉定  嘉定新城板块    3号线  嘉环二线 11号线                                         3

把逗号作为分隔符，每个交通工具都放在一格里。后面再加一个个数。

data test;
input city : $10. area :$8. sector : $20. rail $20.;
cards;  
Shanghai Baoshan Dahua 7,737,738,11,58,78
Shanghai Jiading Jiadingxincheng 3,2,11
;
proc sql noprint;
select max(count(rail,',')+1) into: num
from test;
quit;

data test1;
set test;
array var[*] $ rail1 - rail%sysfunc(left(&num));
do i=1 to #
var[i]=scan(rail,i,',');
end;
n_rail=count(rail,',')+1;
drop i;
run;

wwang111 发表于 2013-8-30 10:22
data test;
input city : $10. area :$8. sector : $20. rail $20.;
cards;

[good code ..........]  zan

wwang111 发表于 2013-8-30 10:22
data test;
input city : $10. area :$8. sector : $20. rail $20.;
cards;

学习下！