【正文】 布隨機數(shù)， alpha0,seed 為任意數(shù)值 RANTRI(seed,h) 產(chǎn)生三角分布隨機數(shù)， 0h1,seed 為任意數(shù)值 RANCAU(seed) 產(chǎn)生標(biāo)準(zhǔn)柯西分布隨機數(shù) RANBIN(seed,n,p) 產(chǎn)生二項分布隨機數(shù)， n0 的整數(shù) ,0p1,seed 為任意數(shù)值 RANPOI(seed,lambda) 產(chǎn)生泊松分布隨機數(shù)， lambda0,seed 為任意數(shù)值 RANTBL(seed,p1,…,p2,…pn) 產(chǎn)生離散分布隨機數(shù)， 0≤ pi≤ 1,seed 為任意數(shù)值 注：種子 seed 一般取 0，或 5 位， 6 位， 7 位的奇整數(shù)。數(shù)組 ARRAY 語句的基本格式為： 圖 用循環(huán) DO 組產(chǎn)生隨機數(shù)數(shù)據(jù)集 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務(wù)系列 上海財經(jīng)大學(xué)經(jīng)濟(jì)信息管理系 IS/SHUFE Created by Page 9 of 20 Array 數(shù)組名 {下標(biāo) } $長度 數(shù)組元素 （初始值） 。 ? Array x{5,3} T1T15 。 ? Array x{3} T1 T2 T3 (100,99,98) 。 第一種方式表示定義了一個一維名為 X 的數(shù)組，它有三個元素，對應(yīng)的變量為 T1， T2和 T3。第三種方式與第二種方式的區(qū)別是還規(guī)定每一維下標(biāo)的下界和上界，通常不特別指明下標(biāo)的下界從 1 開始。第五種方式下標(biāo)用星號 *來代替，表示 SAS 系統(tǒng)通過數(shù)組中的變量個數(shù)來確定下標(biāo)。假設(shè)要由一個老的數(shù)據(jù)集產(chǎn)生一個新的數(shù)據(jù)集，新的數(shù)據(jù)集要新增 n個變量，新增變量 Ti的值與原數(shù)據(jù)集的變量 Xj值和新增變量的位置值 i有關(guān)。程序如下： Data DoArray 。 Array a{4} T1T4 。 a{i}=(X1+X2+X3)*i 。 Card 。 Run 。 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務(wù)系列 上海財經(jīng)大學(xué)經(jīng)濟(jì)信息管理系 IS/SHUFE Created by Page 10 of 20 此程序循環(huán)結(jié)構(gòu)是外循環(huán) DATA 步執(zhí)行二次，因此產(chǎn)生二條觀測，在每次外循環(huán)中，內(nèi)循環(huán) DO重復(fù)執(zhí)行四次，新增四個變量。 3. 在循環(huán) DO 組中使用 OUTPUT 語句產(chǎn)生數(shù)據(jù)集 如果在 DO－ END 內(nèi)循環(huán)結(jié)束語句 END 前插入一條 OUTPUT 語句，那么每次內(nèi)循環(huán)將輸出一條觀測，而不是內(nèi)循環(huán)所產(chǎn)生的所有變量值只輸出在一條觀測中。我們以上面的程序 END 語句前插入一條 OUTPUT 語句為例，程序運行結(jié)果如圖 所示。但如果新增變量值是歷史觀測中原變量值和循環(huán)變量值的函數(shù)值時，首先考慮是將歷史觀測中原變量值取到中間變量，例如數(shù)組變量中。 在數(shù)據(jù)步 DATA 中使用了 RETAIN 語句來為變量設(shè)置初值后 ， RETAIN 語句使得用INPUT語句或賦值語句所指定的變量值從 DATA步的這次執(zhí)行到下一次重復(fù)時被保留 。 我們這里給出了 RETAIN 語句幾種常用的使用格式： ? Retain 。 ? Retain T1 T2 T3 100 。 ? Retain T1 T2 T3 (100 99 98 ) 。第二種使用格式規(guī)定了變量名字，變量列表或數(shù)組名，它們的值是用戶想保留的。第四種使用格式是將初始值 100 用小括號括起來， SAS 系統(tǒng)將分配括號中的這個值給變量列表中的第一個變量，即 T1=100， T2 和 T3 為缺失值。 圖 循環(huán) DO 組中使用了 OUTPUT 語句 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務(wù)系列 上海財經(jīng)大學(xué)經(jīng)濟(jì)信息管理系 IS/SHUFE Created by Page 12 of 20 例如，我們有一組日期 DATE 和收盤價 CLOSE 股票數(shù)據(jù)，要生成一個帶有 3 日移動平均價 MOVEAVER 的數(shù)據(jù)集。昨天和前天收盤價數(shù)據(jù)要在產(chǎn)生時用 RETAIN 語句事先保留下來，在計算當(dāng)日移動平均價時才不至于取到缺失值，而不能計算。 Retain day 3 i 1 。 Array a{4} 。 Retain 。 t=0 。 t= t+a{i} 。 End 。 i=day1 。 i=i+1 。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 程序中使用了自動變量 _n_，它自動存放當(dāng)前觀測的邏輯順序號。程序中的 IF語句就是為了判斷從第三條觀測開始計算 3 日移動平均價而設(shè)置的。如果指定數(shù)組 a{i}，產(chǎn)生的數(shù)據(jù)集只有 DATE、 CLOSE 和MOVEAVER 三個變量。為了始終保持?jǐn)?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ù)分析 電子 商務(wù)系列 上海財經(jīng)大學(xué)經(jīng)濟(jì)信息管理系 IS/SHUFE Created by Page 13 of 20 放 a{2}， a{1}中原數(shù)據(jù)正常丟棄，留空 a{3}準(zhǔn)備讀下一條記錄的收盤價。 對于只有少量觀測的數(shù)據(jù)集，我們還可以編寫如下程序： Data MAV(Keep= date close moveaver) 。 Input date date7. close 。 a{ _n _}= close 。 If _n_= day Then do 。 Do i =_n _ － day + 1 to _n _ 。 End 。 End 。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 這個程序的特點是將歷史記錄的收盤價全部存放到數(shù)組 a{i}中，因此 程序編寫簡單和短 圖 用循環(huán) DO 組、數(shù)組和 RETAIN 語句所產(chǎn)生的 MAV 數(shù)據(jù)集 81edb6ff5799cbd72b415b6e1b9a8a6b SAS 系統(tǒng)和數(shù)據(jù)分析 電子 商務(wù)系列 上海財經(jīng)大學(xué)經(jīng)濟(jì)信息管理系 IS/SHUFE Created by Page 14 of 20 小，容易理解，執(zhí)行速度快。而前面程序中的數(shù)組 a{i}大小只與移動平均的天數(shù)有關(guān)，相對來說是一個很小的數(shù)且是固定的數(shù)。例如求 3 日移動平均線相應(yīng)的程序如下： Data MAV 。 Moveaver=(close+lag1(close)+lag2(close))/3。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 二、 實現(xiàn)選擇（ SELECT 語句） 在 DATA步中使用 SELECT 語句，使 SAS 系統(tǒng)去執(zhí)行幾條語句 或語句組中的一條語句。 SELECT— WHEN 結(jié)構(gòu)非常類似其他程序語言中的 DO CASE 結(jié)構(gòu)。在 SELECT 組中至少必須有一個WHEN語句。最后用一個 END 語句 結(jié)束這個 SELECT 組。