SAS SYNTAX

---

SAS SYNTAX

case when

语法

CASE <case-operand>
WHEN when-condition THEN result-expression
<...WHEN when-condition THEN result-expression>
<ELSE result-expression>

END

例子

proc sql;
  select Name, case
               when Continent = 'North America' then 'Continental U.S.'
               when Continent = 'Oceania' then 'Pacific Islands'
               else 'None'
               end as Region
     from states;

proc sql;
  select Name, case Continent
               when 'North America' then 'Continental U.S.'
               when 'Oceania' then 'Pacific Islands'
               else 'None'
               end as Region
     from states;

compress

功能

从一个字符串移除特定的字符

语法

compress (<source, chars><, modifiers>)

• source: 指定一个字符串来源
• chars: 指定要删除或者保留的字符列表，需用引号

• modifiers: 指定修饰符，不区分大小写，用来控制 compress 函数的具体功能。如：

  a 增加（A - Z， a - z）到初始字符里（chars）。
  d 增加数字到初始字符里（chars）。
  f 增加下划线和字母（A - Z， a - z）到初始字符里（chars）。
  g 增加图形字符到初始字符里（chars）。
  k 不移除初始字符（chars）而是返回这些字符。
  l　增加小写字母（a - z）。
  n 增加数字、下划线和字母（A - Z， a - z）。
  p 增加标点符号。
  s 增加空格，包括空格、水平制表符、垂直制表符、回车符、换行符和换页符。
  t 剪掉尾部空格。
  u 增加大写字母（A - Z）。
  w 增加可印刷的字符。
  X 增加十六进制字符

• 只有source，移除空格。

• 只有source，chars时，从source中移除chars。

• source ，chars，modifiers都有时，modifiers　K决定保留还是移除。无K时，移除chars加上modifiers指定的。

  /*例如这两都是移除数字*/
  COMPRESS（source， “1234567890”）；
  COMPRESS（source，， “d”）；

  /*这两个是移除数字和加减号*/
  COMPRESS（source， “1234567890+-”）；
  COMPRESS（source， “+-”， “d”）；

例子

1. 移除空格

   data _null_；
   a='ABC D '；
   b=compress（a）；
   put b；
   run；

2. 移除小写字母

   /*将修饰符设定为”l”，代表 lowcase，即将所有的小写字母加入到要删除的字符列表中；如不用修饰符”l”，也可以直接把所有a-z的小写字母列入要删除的字符串列表当中，效果一样，但显然前者比较简单；本例可以将所有小写字母和大写的”E”从指定的字符串中删除。*/
   data test; 
   set have; 
   char1=compress(char,"E","l"); 
   run; 
   data test; 
   set have; 
   char1=compress(char,"abcdefghijklmnopqrstuvwxyzE"); 
   run;

3. 移除TAB

   data _null_；
   x='1    2   3   4   5'；
   y=compress（x，，'s'）；
   put y；
   run；

   结果是12345。

4. 保存字符

   data _null_；
   x='Math A English B Physics A'；
   y=compress（x，'ABCD'，'k'）；
   put y；
   run；

   结果是ABA。