sas系統和數據分析用在data步的控制語句(編輯修改稿)

　

【文章內容簡介】 動平均線相應的程序如下： Data MAV 。 Input date date7. close 。 Moveaver=(close+lag1(close)+lag2(close))/3。 Card 。 19MAY99 20MAY99 21MAY99 24MAY99 25MAY99 Proc print data= MAV 。 Run 。 二、 實現選擇（ SELECT 語句） 在 DATA步中使用 SELECT 語句，使 SAS 系統去執行幾條語句 或語句組中的一條語句。本質上是一種多路分支結構，當然可以用 IF— THEN 結構的多層嵌套來實現，但當分支較多時， SELECT 語句會很方便，結構也很清楚。 SELECT— WHEN 結構非常類似其 他 程序語言中的 DO CASE 結構。 SELECT 語句開始一個 SELECT 組， SELECT 組包括一些 WHEN語句，當一個設定的條件為真時，執行對應的 WHEN 語句給出的一些 SAS 語句。在 SELECT 組中至少必須有一個WHEN語句。如果所有的 WHEN 條件均不成立，那么執行 OTHERWISE 語句給出的 SAS 語句。最后用一個 END 語句 結束這個 SELECT 組。 SELECT 語句的一般格式如下： Select (select 表達式 ) 。 When (when 表達式 ) 任意可執行 SAS 語句 ； When (when 表達式 ) 任意可執行 SAS 語句 ； ?? Otherwise 任意可執行 SAS 語句 ； End ； 如果有 SELECT的表達式，首先比較 select表達式和第一個 when表達式計算結果的大小，相等為真，執行這個 WHEN 后面的 SAS 語句；不相等為假，執行下一條 WHEN 語句或1d26d6ca46471a74146acc8594878980 SAS 系統和數據分析 電子商務系列 上海財經大學經濟信息管理系 IS/SHUFE Created by Page 10 of 21 OTHERWISE 語句。 如果沒有 SELECT 的表達式， when 表達式中一定要含有比較操作符，先求出第一個 when表達式的真假結果，如果為真，執行這個 WHEN 后面的 SAS 語句，如果為假，執行下一條WHEN 語句或 OTHERWISE 語句。 要特別注意，一個 SELECT 組是按順序判斷 WHEN語句，一旦某個 WHEN語句滿足條件執行了，就跳出這個 SELECT 組。即使后面 WHEN語句也滿足條件，也不再執行了。所以 ，程序員要注意安排好 WHEN 語句的順序和條件。 例如，我們有一個 CLASS 數據集，存放的是學生的 成績表，我們要創建一個新的數據集CLASS02，新增平均成績 AVER 變量和等級考評 GRADE 變量， GRADE 的值是根據 AVER值的大小給出 A、 B、 C、 D 四個等級。 程序如下： Libname Study “d:\sasdata\mydir” 。 Data Class02 。 Set 。 aver = (test1+test2+test3)/3 。 Select 。 When(aver=90) grade=”A” 。 When(aver=80) grade=”B” 。 When(aver=70) grade=”C” 。 Otherwise grade=”D” 。 End 。 Proc print data= Class02 。 Run 。 程序運行結果見圖 所示。 圖 用 SELECT— WHEN 組產 生的數據集結果 1d26d6ca46471a74146acc8594878980 SAS 系統和數據分析 電子商務系列 上海財經大學經濟信息管理系 IS/SHUFE Created by Page 11 of 21 三、 實現分支（ IF 語句） 在 SAS 語言中， IF 語句有兩種使用格式： ? IF語句的格式之一： IF 條件表達式 THEN SAS 語句 。 ELSE SAS語句 。 ? IF語句的格式之二： IF 條件表達式 。 當我們在創建 SAS 數據集時使用 IF 語句的格式之一，可以根據被處理的觀測是否使 IF條件表達式為真，來決定是否執行 THEN 后面的 SAS 語句。如果條件表達式為假，執行 ELSE后面的語句，沒有 ELSE 語句執行 IF 語句的下一條語句。 IF— THEN/ELSE語句可以多層嵌套，但要注意 IF— THEN/ELSE 語句的程序編寫格式和匹配。另外 ， THEN 和 ELSE 后還可以跟 DO 語句， 格式見 DO 語句的程序格式之一。 1. 使用 IF— THEN/ELSE 語句 例如，我們有一個 SURVEY 數據集，其中有人的身高 HEIGH和體重 WEIGHT 數據，現在我們要創建一個新的數據集 SURVEY02，新的數據集新增一個變量 FATNESS，用以標識這個人是否肥胖。假設， 人的標準體重計算公式 .：男性之標準體重（千克）＝身長（厘米）－１００，女性之標準體重（千克）＝身長（厘米）－１０２。 如果超過 標準體重 的 20%，就算肥胖，用 Y 來表示，否則用 N 來表示。 程序如下： Libname Study “d:\sasdata\mydir” 。 Data Survey02 。 Set 。 if sex=M then if weight=(heigh*100100)* then fatness=y。 else fatness=n。 else If weight=(heigh*100102)* then fatness=y。 else fatness=n。 Proc print data= Survey02 。 Run 。 在使用 IF— THEN/ELSE 語句的多層嵌套結構時要注意兩點：一是要以鋸齒型來排列一1d26d6ca46471a74146acc8594878980 SAS 系統和數據分析 電子商務系列 上海財經大學經濟信息管理系 IS/SHUFE Created by Page 12 of 21 組組 IF— THEN/ELSE 語句，目的是為了通過程序書寫格式就能明確 IF— THEN/ELSE語句的層次和配對。二是如果 THEN 和 ELSE后的 SAS 語句不直接寫在同行的后面，而是寫在下一行， THEN 和 ELSE 后不能加分號“；”，表示本程序行并沒有結束，直到遇到分號“；”為止。 程序運行結果我們在這里就省略了。 2. 使用 IF 語句 當我們在創建 SAS 數據集時使用 IF 語句的格式之二，常用來創建滿足 IF 條件表達式的新數據集。例如，我們要從 SURVEY 數據集中挑選出所有男性觀測來產生一個新數據集SURVEY03。 程序如下： Libname Study “d:\sasdata\mydir” 。 Data Survey03 。 Set 。 if sex=M ； Proc print data= Survey03 。 Run 。 四、 實現轉移（ GOTO 語句） GOTO是一種無條件轉移語句，它告訴 SAS 系統立即轉到 GOTO 語句所指的那條語句，并從那條語句開始執行后面的語句。 GOTO語句的實 現，是通過 GOTO語句中和目標語句前使用相同的語句標號才識別目標和實現轉移的。要注意 GOTO 語句只能在同一個 DATA步中進行轉移。 GOTO 語句的基本使用格式如下： Data 數據集 。 ?? 。 GOTO 語句標號 。 ?? 。 語句標號 ：?? 。 ?? 。 Run 。 GOTO 語句是一種非結構化程序設計語句，它通過語句標號可轉移到任意目的地的特性常常破壞程序的結構化，許多 其他 語言都不主張使用或禁止使用。當然 GOTO 語句的功能是可以通過 其他 結構化控制轉移語句替代實現。但是 GOTO 語句也有明顯的特點，能很方便地和靈活地進行轉移。 GOTO語句最常見的使用，是出現在 IF— THEN 語句中，作為 THEN分句。例如，我們1d26d6ca46471a74146acc8594878980 SAS 系統和數據分析