SAS中文论坛

标题: 一个困扰我的很难得数据处理问题 [打印本页]

作者: shiyiming 时间: 2009-11-5 10:59
标题: 一个困扰我的很难得数据处理问题
我有这样一个数据集：
data a;
input n id X1 X2@@;
cards
1  1  2 3
1  2  3 3
1  3  3  4
2  1 2  3
2 2  3  4
;
run;

这个数据集是表示第一个变量跟后面多个变量对应，我想把一个变量的三行变为一行，比如说1这个变量，后面有1 2 3 三个变量对应，我想能不能用SAS程序编为这样的1 2 3 3 3 3 4 ，2这个变量就变为2 2 3 3 4 的，麻烦各位高手帮忙。

作者: shiyiming 时间: 2009-11-5 13:14
标题: Re: 一个困扰我的很难得数据处理问题
问题没看明白，谢谢！

作者: shiyiming 时间: 2009-11-5 22:01
标题: Re: 一个困扰我的很难得数据处理问题
[quote:3jt8lk7d]我想能不能用SAS程序编为这样的1 2 3 3 3 3 4 ，2这个变量就变为2 2 3 3 4[/quote:3jt8lk7d]

如果把变量理解为行的话，那第二行不就成了瘸子了吗？第一行7个变量第二行5个。人瘸可以，SAS如果瘸了，它就不干活了。

作者: shiyiming 时间: 2009-11-6 09:59
标题: Re: 一个困扰我的很难得数据处理问题
按我理解，LZ应该是这个意思吧，偶比较愚钝..
n X1_id X2_id 即
n X1_1 X2_1 X1_2 X2_2 X1_3 X2_2
1 2 3 3 3 3 4
2 2 3 3 4 . .

作者: shiyiming 时间: 2009-11-6 17:06
标题: Re: 一个困扰我的很难得数据处理问题
[code:1wi9y0qq]
data raw;
length x $20;
input;
id=input(scan(_infile_,1),best.);
x=substr(_infile_,5);
datalines;
1 1 2 3
1 2 3 3
1 3 3 4
2 1 2 3
2 2 3 4
;

proc sort data=raw;
by id;
run;

data final(drop=x varn max);
retain max;
length x_list $50;
do _n_=1 by 1 until(last.id);
set raw end=eof;
by id;
x_list=catx(' ',strip(x_list),strip(x));
end;
varn=count(strip(x_list),' ')+1;
max=max(max,varn);
if eof then call symputx('varn',max);
run;

data final(drop= x_list i);
set final;
array arr{*} x1-x&varn;
do i=1 to &varn;
arr(i)=input(scan(x_list,i),best.);
end;
run;[/code:1wi9y0qq]

作者: shiyiming 时间: 2009-11-6 18:14
标题: Re: 一个困扰我的很难得数据处理问题
[code:2oa01swx]data a;
input n id X1 X2@@;
cards;
1 1 2 3
1 2 3 3
1 3 3 4
2 1 2 3
2 2 3 4
;
run;
proc transpose data=a out=ax1(drop=_name_) prefix=x1_;
  var x1;
  id id;
  by n;
run;
proc transpose data=a out=ax2(drop=_name_) prefix=x2_;
  var x2;
  id id;
  by n;
run;
data aa;
  merge ax1 ax2;
run;
[/code:2oa01swx]

欢迎光临 SAS中文论坛 (http://www.mysas.net/forum/)