SAS的初级入门（二）

1. SAS 的运算符，其中常用的算术运算符，包括：+、-、*、/；比较算符，包括：=（eq）、^=（NE）、>（gt）、< （lt）、〈=（lt）、〉=（gt）、in（包含）；逻辑算符，包括：&（and）、|（or）；其他的运算符，〉〈（最小值），〈〉（最大值），||（连接符）

例子：

data oranges;
     input variety $ flavor  texture looks;
     total=flavor+texture+looks;

     if variety in ('navel','valencia') 
         then total=total*10;

     if (flavor<texture & variety='mandarin') 
         then total=total*100; 

     a=flavor<>texture**2;
     b=variety||'.var';
 
     label total="总数";
     cards;
navel  9 8 6
temple 7 7 7
Valencia 8 9 9
mandarin 5 7 8
;
proc sort data=oranges;
  by descending total;
  run;
proc print data=oranges;
  /*var _numeric_;*/
 /* var _character_;*/
  title '对ORANGES数据集的品尝检验结果';
run;

2. SAS 中的函数

字符串函数：floor 取最小值；substr（S，p，x）表示截取字符串从第p开始；截取 x 长度的字符，scan（S，n）表示获得以空格分割的第n个字符串，也可以写成scan（S，n，s1）表示获得以s1分割的第n个字符串；upcase（S）表示将字符串变为大写；compress（S1，S2）表示将两个字符串取出S1中所有的S2的字符。

数学函数：max（x1，x2）取两个数中的最大值；sum（x1，x2）求两个数之和；sign（x1）符号函数；mean（x1，x2）取两个数的平均值。

时间函数：year（date）获得年；month（date）获得月份；day（date）获得天；qtr（date）获得季度。

其他函数：ranuni（seed）随机函数，其中的seed要大于0。

例子：

data bbb;
  input x1-x5 x6 $ date yymmdd15.;
  /*format date yymmdd10.;*/
  *format date weekdate12.;
  x7='o';
  x8='I am a student';
  /*以下是数学函数*/
  a1=max(x1,x2);
  a2=sum(x1,x2);
  a3=sign(x3);
  a4=sqrt(x5);
  a5=mean(x1,x2);
  /*以下是截取函数*/
  b1=floor(a5);
  /*以下是字符函数*/
  c1=index(x6,x7);
  c2=substr(x6,3,3);
  c3=scan(x8,2);
  c4=upcase(x8);
  c5=compress(x6,x7);
  /*以下是时间函数*/
  d1=weekday(date);
  d2=year(date);
  d3=qtr(date);
  d4=day(date);
  /*以下是概率函数*/
  e1=probnorm(0);
  e2=n(of x1-x5);
  e3=nmiss(of x1-x5);
  e4=var(x1,x2);
  e5=std(x1,x2);
  /*以下是随机数函数*/
  f1=ranuni(1);
  
  cards;
1  2   3  5  -6  amazon   2004/9/22
3  5   0  8  0   box      1960/1/2
9  10  -7  9  4  check    1960/1/1
7  6   .  1  8   delete   1959/12/31
-2.5 -2.3 3 1 2  desk     2005/9/29 
;
run;
proc print;
run;

3. SAS 中的数据步

SAS 中含有一些内置变量，格式为"_变量名_"，其中 _N_ 表示data 步执行的次数，也就是读到了数据的第几行，_error_ 为 1 的时候表示数据步出错。

例子：

data flow;
  /*put x= y= z= _n_;*/
  input x y;
  z=x+y;
  put x= y= z=;
  put _n_= _error_=;
  cards;
10 20
100 200
1000 2000
;
run;