Re: [問題] SAS讀檔??
※ 引述《alias.bbs@ptt.cc (希望)》之銘言：
> ※ 引述《hopper123 (clue)》之銘言：
> : 請問SAS可以ㄧ次讀很多檔案進去嗎??
> : 例如我有十個檔案(格式皆相同) A001 A002 A003....A010
> : 我不想寫十遍Infile()
> : 請問可以用其他方法讀嗎??
*Macro PADZERO 在數字前補0, 使其長度固定.
%Macro PADZERO(number,digit);
%LET _l=%LENGTH(&&&number);
%IF &_l<&digit %THEN
%DO _j=&_l+1 %TO &digit;
%LET &number=0&&&number;
%END;
%MEND;
*以下取 alias 的 Macro 做修改.
%Macro RFILES(prefix,begno,endno,digits=0);
%IF &digits<1 %THEN
%LET digits=%LENGTH(&endno);
%DO i=&begno %TO &endno;
%PADZERO(&i,&digits);
%LET _fname=&prefix&i;
DATA &_fname;
INFILE "&Path&_fname..&Ext";
* Path 是檔案路徑, Ext 為延伸檔名, 呼叫此 macro
* 前設定之. 或如 alias 原 macro, 用固定字串亦可.
/*
(put your statements for data processing)
*/
RUN;
%END;
%MEND;
原問之讀檔:
%LET Path=C:\;
%LET Ext=dat;
%RFILES(A,1,10,digits=3)
未試. 有無錯誤不知.
--
H E L P !!! 統 計 專 業 版 需 要 你 !!! 來 貼 文 吧 !!!
無名小站 telnet://wretch.twbbs.org Statistics (統計方法討論區)
成大計中站 telnet://bbs.ncku.edu.tw Statistics (統計方法及學理討論區)
盈月與繁星 telnet://ms.twbbs.org Statistics (統計：讓數字說話)
交大資訊次世代 telnet://bs2.twbbs.org Statistics (統計與機率)
★本文未經本人同意請勿轉載; 回覆請勿全文引用, 請僅留下直接涉及部分。
--
夫兵者不祥之器物或惡之故有道者不處君子居則貴左用兵則貴右兵者不祥之器非君子
之器不得已而用之恬淡為上勝而不美而美之者是樂殺人夫樂殺人者則不可得志於天下
矣吉事尚左凶事尚右偏將軍居左上將軍居右言以喪禮處之殺人之眾以哀悲泣之戰勝以
喪禮處之道常無名樸雖小天下莫能臣侯王若能守之萬物將自賓天地相合以降甘露民莫
之令而自均始制有名名亦既有夫亦將知止知止可以不殆譬道之在天140.116.52.117海
作者在 06/07/21 18:15:31 從 140.116.52.117 修改這篇文章
作者在 06/07/21 18:16:16 從 140.116.52.117 修改這篇文章
討論串 (同標題文章)