【文章內容簡介】 如圖 所示。 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務系列 上海財經(jīng)大學經(jīng)濟信息管理系 IS/SHUFE Created by Page 10 of 20 此程序循環(huán)結構是外循環(huán) DATA 步執(zhí)行二次，因此產(chǎn)生二條觀測，在每次外循環(huán)中，內循環(huán) DO重復執(zhí)行四次，新增四個變量。使用 DO 語句的循環(huán)變量 i作為數(shù)組的下標，這種下標的使用方法是 DO 循環(huán)中處理下標數(shù)組最常用的方法。 3. 在循環(huán) DO 組中使用 OUTPUT 語句產(chǎn)生數(shù)據(jù)集 如果在 DO－ END 內循環(huán)結束語句 END 前插入一條 OUTPUT 語句，那么每次內循環(huán)將輸出一條觀測，而不是內循環(huán)所產(chǎn)生的所有變量值只輸出在一條觀測中。對于每條觀測的變量取值，要注意在 DATA步的同一個外循環(huán)中，已經(jīng)產(chǎn)生的變量值保持不變，內循環(huán) OUTPUT語句前未賦值的變量為缺失值，直到 DATA步的下一個外循環(huán)開始時，所有用 INPUT 或賦值語句創(chuàng)建的變量在重復 DATA步開始時將被設置為缺失值。我們以上面的程序 END 語句前插入一條 OUTPUT 語句為例，程序運行結果如圖 所示。 圖 循環(huán) DO 組中使用數(shù)組來產(chǎn)生數(shù)據(jù)集 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務系列 上海財經(jīng)大學經(jīng)濟信息管理系 IS/SHUFE Created by Page 11 of 20 4. 用循環(huán) DO 組和 RETAIN 語句產(chǎn)生數(shù)據(jù)集 由已有數(shù)據(jù)集產(chǎn)生具有新增變量的新數(shù)據(jù)集時，通常新增變量值是本條觀測原變量值和循環(huán)變量值的函數(shù)值。但如果新增變量值是歷史觀測中原變量值和循環(huán)變量值的函數(shù)值時，首先考慮是將歷史觀測中原變量值取到中間變量，例如數(shù)組變量中。但是因為在每次重復開始 DATA步時，所有用 INPUT 或賦值語句創(chuàng)建的變量將被設置為缺失值，那該如何處理解決呢？在 SAS 系統(tǒng)中有一條 RETAIN 語句專門用于解決這一問題。 在數(shù)據(jù)步 DATA 中使用了 RETAIN 語句來為變量設置初值后 ， RETAIN 語句使得用INPUT語句或賦值語句所指定的變量值從 DATA步的這次執(zhí)行到下一次重復時被保留 。而如果沒有使用 RETAIN 語句， DATA步每次重復執(zhí)行之前這些變量就會被設置為缺失值。 我們這里給出了 RETAIN 語句幾種常用的使用格式： ? Retain 。 ? Retain T1 T2 T3 。 ? Retain T1 T2 T3 100 。 ? Retain T1 T2 T3 (100 ) 。 ? Retain T1 T2 T3 (100 99 98 ) 。 第一種使用格式表示用 INPUT語句或賦值語句創(chuàng)建的所有變量從 DATA步的這次執(zhí)行到下一次重復時被保留。第二種使用格式規(guī)定了變量名字，變量列表或數(shù)組名，它們的值是用戶想保留的。第三種使用格式表示一個變量列表 T T T3 接受同一個初始值 100。第四種使用格式是將初始值 100 用小括號括起來， SAS 系統(tǒng)將分配括號中的這個值給變量列表中的第一個變量，即 T1=100， T2 和 T3 為缺失值。第五種使用格式給出了初始值列表，將依次分配初始值列表中的值給變量列表中各個變量，即 T1=100， T2=99， T3=98。 圖 循環(huán) DO 組中使用了 OUTPUT 語句 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務系列 上海財經(jīng)大學經(jīng)濟信息管理系 IS/SHUFE Created by Page 12 of 20 例如，我們有一組日期 DATE 和收盤價 CLOSE 股票數(shù)據(jù)，要生成一個帶有 3 日移動平均價 MOVEAVER 的數(shù)據(jù)集。所謂 3 日移動平均價，指最近 3 日收盤價的平均值，即當天、昨天和前天收盤價的平均值。昨天和前天收盤價數(shù)據(jù)要在產(chǎn)生時用 RETAIN 語句事先保留下來，在計算當日移動平均價時才不至于取到缺失值，而不能計算。為了便于理解，我們將程序編寫如下： Data MAV 。 Retain day 3 i 1 。 Input date date7. close 。 Array a{4} 。 a{ i }= close 。 Retain 。 If _n_= day Then do 。 t=0 。 Do i = 1 to day 。 t= t+a{i} 。 a{i}= a{i +1} 。 End 。 moveaver=t/day 。 i=day1 。 End 。 i=i+1 。 Card 。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 Run 。 程序中使用了自動變量 _n_，它自動存放當前觀測的邏輯順序號。移動平均價的計算要考慮初始情況，對于 3 日移動平均價來講，第一條和第二條觀測的 3 日移動平均價的數(shù)值是不存在的，從第三條觀測開始有計算數(shù)據(jù)。程序中的 IF語句就是為了判斷從第三條觀測開始計算 3 日移動平均價而設置的。第一條 RETAIN語句的目的是設置常量 day=3，下標變量 i的初值為 1，第二條 RETAIN 語句的主要目的是為了保留存放收盤價數(shù)據(jù)的數(shù)組 a{i}，我們?yōu)榱耸勾蠹颐靼赘鱾€變量的變化過程， RETAIN 語句后未專門指定數(shù)組 a{i}，而是保留用 INPUT語句或賦值語句創(chuàng)建的所有變量。如果指定數(shù)組 a{i}，產(chǎn)生的數(shù)據(jù)集只有 DATE、 CLOSE 和MOVEAVER 三個變量。 DO－ END 循環(huán)的作用是用 T 累加器求最近三日收盤價之和， T 變量每次求和前要初始化為 0。為了始終保持數(shù)組 a{1} 、 a{2}、 a{3}中存放的是最近三日的收盤價數(shù)據(jù)，用 a{i}= a{i +1}語句將剛計算過的數(shù)據(jù)前移， a{2}中數(shù)據(jù)存放 a{1}， a{3}中數(shù)據(jù)存81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務系列 上海財經(jīng)大學經(jīng)濟信息管理系 IS/SHUFE Created by Page 13 of 20 放 a{2}， a{1}中原數(shù)據(jù)正常丟棄，留空 a{3}準備讀下一條記錄的收盤價。程序運行結果如圖 所示。 對于只有少量觀測的數(shù)據(jù)集，我們還可以編寫如下程序： Data MAV(Keep= date close moveaver) 。 Retain day 3 。 Input date date7. close 。 Array a{5} 。 a{ _n _}= close 。 Retain 。 If _n_= day Then do 。 t=0 。 Do i =_n _ － day + 1 to _n _ 。 t= t+a{i} 。 End 。 moveaver=t/day 。 End 。 Card 。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 Run 。 這個程序的特點是將歷史記錄的收盤價全部存放到數(shù)組 a{i}中，因此 程序編寫簡單和短 圖 用循環(huán) DO 組、數(shù)組和 RETAIN 語句所產(chǎn)生的 MAV 數(shù)據(jù)集 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析