《SAS编程与数据挖掘商业案例》学习笔记之十六
《SAS编程与数据挖掘商业案例》学习笔记,本次重点:sas宏变量
内容包含:宏变量、宏函数、宏參数、通配函数、字符函数、计算函数、引用函数、宏语句、宏应用
1.宏触发器:
%name-token:是一个宏语句或宏函数
&name-token:是一个宏变量引用
宏变量不依赖于sas数据集,能够在不论什么一个除数据行以外的地方定义和引用宏变量,一般定义的宏变量为局部变量,除非使用%global,定义宏变量用%let,显示宏变量用%put,调用宏变量用&。
eg:
%let a=xxx;
%put &a;
%put here is &a;
Eg:带引號的文本中引用宏变量
%let var=ddd;
Data a;
X="here is &var.";
run;
假设要正确引用宏变量var值,必须用双引號而不是单引號括住该文本,由于宏处理器仅仅能在双引號中进行替换。
proc sql;
create table temp as
select *
from sashelp.class
where sex like '%M%'
;
quit;
eg:间接引用宏变量
%let mvar=here;
%let x=10;
%put &&mvar.&x ;
当程序读到第一个&时,立马启动宏触发器,因为存在句点号,故宏处理器会接受两个宏变量&mvar和&x
2.宏函数
libname test ' f:\data_model\book_data\chapt10';
options mstored sasmstore=test;
%macro test
/ store ; *是定义宏的keyword
data a;
x=1;
run;
%mend test; 是宏定义结束的标识
宏存储,会将宏生成到对应文件夹以下的sasmar文件中面,
调用永久存储的宏:
libname test ' f:\data_model\book_data\chapt10';
options mstored sasmstore=test;
%test;
3.宏參数
宏功能强大之处在于宏參数,定义宏參数有两种方法,
按值创建宏參数:
%macro value(x=,y=);
data test;
x=&x.;
y=&y.;
run;
%mend value;
调用:
%value(x=10,y=20);
按地址创建宏參数
%macro addr(x,y);
data test;
x=&x.;
y=&y.;
run;
%mend addr;
调用:
�dr(10,20);
4.通配函数
是指可以在sas宏中引用data步的函数,最经常使用的通配函数是%sysfunc
Eg;
%num=10;
%let x=%sysfunc(trim(%sysfunc(left(&num))));
%put &x;
Eg:translate函数应用
%let string1 = v01n01-v01n10;
%let string1 = %sysfunc(translate(&string1,p, n));
%put with n translated to p, v01n01-v01n10 is &string1;
eg:推断数据集是否存在
%let dsn=%sysfunc(exist(sashelp.class));
%put &dsn;
5.计算函数
宏计算函数有两个:
%EVAL:计算算术和逻辑表达式(整数格式)
%SYSEVALF:计算算术和逻辑表达式(浮点格式)
Eg:
%let a=1 2;
%let b=10*3;
%let c=5/3;
%let eval_a=%eval_r(&a);
%let eval_b=%eval_r(&b);
%let eval_c=%eval_r(&c);
%put &a is &eval_a;
%put &b is &eval_b;
%put &c is &eval_c;
Eg:函数累加器
%macro test(finish);
%let i=1;
%do %while (&i<&finish);
%put the value of i is &i;
%let i=%eval_r(&i 1);
%end;
%mend test;
%test(5)
eg:
%sysevalf(1/3,boolean)
%sysevalf(10 .,boolean)
%sysevalf(1 1.1,ceil)
%sysevalf(-1 -2.4,ceil)
%sysevalf(-1 1.e-11,ceil)
%sysevalf(10 .)
%sysevalf(-2.4,floor)
%sysevalf(3,floor)
%sysevalf(1.-1.e-13,floor)
%sysevalf(.,floor)
%put %sysevalf(2.1,integer);
%put %sysevalf(-2.4,integer);
%put %sysevalf(3,integer);
%put %sysevalf(-1.6,integer);
%put %sysevalf(1.-1.e-13,integer);
6.字符函数
%index |
返回一个字符串第一次出现的位置 |
%length |
返回自变量长度 |
%QSCAN |
扫描单词,并引用包含%和&的结果 |
%QSUBSTR |
提取包含%和&的子串,并引用包含%和&的结果 |
%QUPCASE |
转换包含%和&的小写字符为大写 |
%SCAN |
扫描单词,并返回一个结束引用的结果 |
%substr |
提取子串,并返回一个结束引用的结果 |
%upcase |
转换小写字符为大写字符,并返回一个结果引用的结果 |
Eg:
%macro a;
aaaaaa
%mend a;
%macro b;
bbbbbb
%mend b;
%macro c;
cccccc
%mend c;
%let x=%nrstr(%a*%b*%%c);
%put X: &x;
%put The third word in X, with SCAN: %scan(&x,3,*);
%put The third word in X, with QSCAN: %qscan(&x,3,*);
7.引用函数
%nrstr |
引用固定文本,包含&和% |
%str |
引用固定文本,不包含&和% |
%quote |
引用一个可分辨的值,不包含%和& |
%nrbquote |
引用一个可分辨的值,包含未处理的特殊符号,&和%,sas操作符 |
%nrquote |
引用一个可分辨的值,包含未处理的特殊字符 |
eg:
%macro x;
xxxxx;
%mend x;
%put : The result of str is :%str(%x);
%put: The result of nrstr is :%nrstr(%x);
eg:
%macro dept2(state);
%if %quote(&state)=nc %then
%put north carolina department of revenue;
%else %if %quote(&state)=%str(or) %then
%put department of revenue;
%else %put others;
%mend dept2;
�pt2(or)
调用�pt2(or)后,參数state获得值or,因为在sas系统里面or是一个逻辑操作符,所以为了得到纯文本含义的or,仅仅能用%quote
8.宏语句
eg:
%macro obs(parm);
%let parm1 = %upcase(&parm);
%if &parm1 = PRE %then
%do;
data pre_obs;
set sashelp.class(obs=5);
if sex="M" then y=1;
else y=2;
run;
%end;
%else %if &parm1 = POST %then
%do;
data post_obs;
set sashelp.class(firstobs=6);
if sex="M" then y=1;
else y=2;
run;
%end;
%mend obs;
%obs(pre);
eg:
%macro dow();
%let i=1;
%do %while (&i<5) ;
%let i=%eval_r(&i. 1);
%put &i.;
%end;
%mend dow;
%dow;
eg:搜寻子字符串并输出
%macro dw(word);
%let i=1;
data out;
%do %while (%left(%scan(&word.,&i.)) ne %nrbquote(stop));
%let var=%scan(&word.,&i.);
%put &var.;
out="&var";
output;
%let i=%eval_r(&i. 1);
%put &i.;
%end;
run;
%mend dw;
%dw(%str(test1,test2,test3));
9.宏应用
eg:通过sql过程创建多个宏变量
proc sql noprint;
select nvar,nobs
into:nvar , :nobs
from dictionary.tables
where libname = 'SASHELP' and memname = 'CLASS';
quit;
%put &nvar.;
%put &nobs.;
eg:通过sql过程用变量名创建宏变量列表
proc sql noprint;
select name
into :clist1-:clist999
from dictionary.columns
where libname = 'SASHELP' and memname = 'CLASS';
quit;
%put &clist1.;
%put &clist2.;
eg:通过data步接口子程序call
symputx
data _null_;
set sashelp.class nobs=obs;
call symputx('m1',obs);
call symput('m2',obs);
Stop;
run;
%put &m1.;
%put &m2.;
注:symputx能消除后面參数的左右空格,而symput仅仅能消除右空格。
eg:重命名指定文件夹下的sas数据集名称
libname chap10 "f:\data_model\book_data\chapt10";
%let rpt=rpt_temp;
proc sql;
create table chap10.change_tb_name as
select
memname
from dictionary.tables
where libname eq "CHAP10";
quit; *上面主要是产生指定文件夹下全部sas数据集名称
%macro change();
%let dsid=%sysfunc(open(chap10.change_tb_name)); 1)打开数据集,每行执行一次open,并返回id给宏变量dsid
%if &dsid gt 0 %then %do; 2)对返回的id号推断,若成功打开数据集,则id肯定非0,则运行do语句
%let nobs=%sysfunc(attrn(&dsid,nobs)); 3)抓取数据集的观測数,返回一个数值
%do i=1 %to &nobs; 4)运行5次循环
%let rc=%sysfunc(fetchobs(&dsid,&i)); 5)抓取对于的观測
%let varnume=%sysfunc(varnum(&dsid,memname)); 6)找到memname所在的列位置
%let table=%sysfunc(getvarc(&dsid,&varnume)); 7)抓取memname相应位置的值
proc datasets lib=chap10; 8)利用每一个返回的值,运行datasets过程步,改变对应数据集的名称
change &table=&rpt._t&i.;
quit;
%end; 9)结束%do语句
%let dsid=%sysfunc(close(&dsid)); 10)关闭数据集
%end; 11)
%mend change;
%change;
《SAS编程与数据挖掘商业案例》学习笔记之十六的更多相关文章
- 《SAS编程和数据挖掘商业案例》第14部分学习笔记
继续<SAS编程与数据挖掘商业案例>学习笔记系列,本次重点:经常使用全程语句 所谓全程语句.是指能够用在不论什么地方的sas语句,既能够用在data数据步语句里面,也能够用在proc过程步 ...
- 《SAS编程和数据挖掘商业案例》学习笔记# 19
继续<SAS编程与数据挖掘商业案例>学习笔记,本文側重数据处理实践.包含:HASH对象.自己定义format.以及功能强大的正則表達式 一:HASH对象 Hash对象又称散列表,是依据关键 ...
- SAS学习笔记之《SAS编程与数据挖掘商业案例》(5)SAS宏语言、SQL过程
SAS学习笔记之<SAS编程与数据挖掘商业案例>(5)SAS宏语言.SQL过程 1. 一个SAS程序可能包含一个或几个语言成分: DATA步或PROC步 全程语句 SAS组件语言(SCL) ...
- SAS学习笔记之《SAS编程与数据挖掘商业案例》(4)DATA步循环与控制、常用全程语句、输出控制
SAS学习笔记之<SAS编程与数据挖掘商业案例>(4)DATA步循环与控制.常用全程语句.输出控制 1. 各种循环与控制 DO组 创建一个执行语句块 DO循环 根据下标变量重复执行DO和E ...
- SAS学习笔记之《SAS编程与数据挖掘商业案例》(3)变量操作、观测值操作、SAS数据集管理
SAS学习笔记之<SAS编程与数据挖掘商业案例>(3)变量操作.观测值操作.SAS数据集管理 1. SAS变量操作的常用语句 ASSIGNMENT 创建或修改变量 SUM 累加变量或表达式 ...
- SAS学习笔记之《SAS编程与数据挖掘商业案例》(2)数据获取与数据集操作
SAS学习笔记之<SAS编程与数据挖掘商业案例>(2)数据获取与数据集操作 1. SET/SET效率高,建立的主表和建表索引的查询表一般不排序, 2. BY语句,DATA步中,BY语句规定 ...
- SAS学习笔记之《SAS编程与数据挖掘商业案例》(1)系统简介和编程基础
SAS学习笔记之<SAS编程与数据挖掘商业案例>(1)系统简介和编程基础 1. SAS系统简介 1.1 SAS是先编译后执行的语言,data步标志着编译的开始. 数据指针:当前内存缓存区, ...
- 《SAS编程与数据挖掘商业案例》学习笔记之十五
继续<SAS编程与数据挖掘商业案例>读书笔记,本次重点:输出控制 主要内容包含:log窗体输出控制.output窗体输出控制.ods输出控制 1.log窗体输出控制 将日志输出到外部文件 ...
- 《SAS编程与数据挖掘商业案例》学习笔记之十八
接着曾经的<SAS编程与数据挖掘商业案例>,之前全是sas的基础知识,如今開始进入数据挖掘方面笔记,本文主要介绍数据挖掘基本流程以及应用方向,并以logistic回归为例说明. 一:数据挖 ...
随机推荐
- PHP str_replace() 和str_ireplace()函数
PHP str_replace() 和str_ireplace()函数 实例 把字符串 "Hello world!" 中的字符 "world" 替换为 &quo ...
- [CQOI2009] 叶子的颜色 解题报告(树形DP)
题目链接:https://www.lydsy.com/JudgeOnline/problem.php?id=1304 Description 给一棵m个结点的无根树,你可以选择一个度数大于1的结点作为 ...
- P3227 [HNOI2013]切糕
题目描述 经过千辛万苦小 A 得到了一块切糕,切糕的形状是长方体,小 A 打算拦腰将切糕切成两半分给小 B.出于美观考虑,小 A 希望切面能尽量光滑且和谐.于是她找到你,希望你能帮她找出最好的切割方案 ...
- HDU 3342 Legal or Not(判断环)
Problem Description ACM-DIY is a large QQ group where many excellent acmers get together. It is so h ...
- C#派生类中使用基类protected成员的方法
我们知道C#中通过继承可以使一个具有公共数据和方法的基类被广泛应用从而减少代码量,这样派生类会具有基类中所有成员(除构造器等),我们理所当然可以通过派生类实例来使用基类的成员.那么当基类成员被prot ...
- PHP——下载图片到本地代码
<?php //获取网页图片 $url = "http://qlogo2.store.qq.com/qzone/393183837/393183837/50"; $curl ...
- NPashaP的二分图源码部分
源码链接:https://github.com/nelsonkuang/ant-admin/blob/master/src/utils/d3-viz.js 的二分图部分. 1.整体的级联结构 整个bp ...
- [洛谷P2245]星际导航
题目大意:有一张n点m边的带权无向图,和一些问题,每次询问两个点之间的路径的最大边权最小是多少. 解题思路:同NOIP2013货车运输,只是数据增大,大变成小,小变成大了而已.所以具体思路见货车运输. ...
- 紫书 例题 10-26 UVa 11440(欧拉函数+数论)
这里用到了一些数论知识 首先素因子都大于M等价与M! 互质 然后又因为当k与M!互质且k>M!时当且仅当k mod M! 与M!互质(欧几里得算法的原理) 又因为N>=M, 所以N!为M! ...
- 介绍静态链接库和动态链接库的差别,及在VC++6.0中的建立和使用
首先介绍一下链接库:链接库分为动态链接库和静态链接库两种 LIB是静态链接库,在程序编译连接的时候是静态链接,其相应的文件格式是.lib. 即当程序採用静态链接库的时候..lib文件里的函数被链接到终 ...