Re: [問題] sas 迴圈整理資料 已爬過文但解不出來

[MmmRrrrX (銀色的靈魂)]

※ 引述《icebing (愛吃冰的艾斯冰= =")》之銘言：
: 原始資料是
: COID  DATE     VAR1  VAR2
: 1515  19750319  3      6
: 1515  19750320  8     10
: 1515  19750321  5      8
: 1618  19750319  6      8
: 1618  19750320  7     10
: 1618  19750321  5      5
: 1712  19750319  5      6
: 1712  19750320  8     20
: 1712  19750321  9      9
: 想改成
: COID  DATE    VAR1  VAR2   COID DATE     VAR1 VAR2  COID  DATE     VAR1  VAR2

變數名稱不能相同 這裡不知道你打算怎麼處裡

: 1515  19750319  3     6    1618 19750319  6     8   1712  19750319   5     6
: 1515  19750320  8     10   1618 19750320  7    10   1712  19750320   8    20
: 1515  19750321  5     8    1618 19750321  5     5   1712  19750321   9     9
: 資料長度大約有30年 公司家數有1333家  想要把直的拆成橫的
: 爬文之後有用這個程式 但是跑不出來 請會的人幫我解答 謝謝


data aa;
input COID DATE VAR1 VAR2;
cards;
1515  19750319  3      6
1515  19750320  8     10
1515  19750321  5      8
1618  19750319  6      8
1618  19750320  7     10
1618  19750321  5      5
1712  19750319  5      6
1712  19750320  8     20
1712  19750321  9      9
;

data bb;
set aa;
by  COID;
if _n_=1 then temp=0;
retain temp;
if first.COID then temp=temp+1 ;
run;

data a1;
set bb;
if temp=1;
COID_1=COID;
DATE_1=DATE;
VAR1_1=VAR1;
VAR2_1=VAR2;
drop COID DATE VAR1 VAR2 temp;
run;

%macro aa;
%do s=2 %to 3;

data a2;
set bb;
if temp=&s;
COID_&s=COID;
DATE_&s=DATE;
VAR1_&s=VAR1;
VAR2_&s=VAR2;
drop COID DATE VAR1 VAR2 temp;
run;

data a1;
merge a1 a2;
run;

%end;
%mend;
%aa;


--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 218.172.233.193
推 icebing:我成功了 謝謝!!感激不盡壓
推 bbearh:thanks, 多學一招