金融计算

data r_y; set bb; if last_year=1; r1=dif(Clpr)/lag(Clpr); r2=log(clpr)-log(lag(clpr));
data r_q; set bb; if last_qtr=1; r1=dif(Clpr)/lag(Clpr); r2=log(clpr)-log(lag(clpr));
• • • •
3.3宏参数
宏变量和宏结合在一起是一种强有力的编 程方法。但应用起来并不十分方便。最常 用的是在宏中使用宏参数。 宏参数是一种特殊的宏变量，是定义在宏 %MACRO语句内的宏变量。
• • • • • • •
%macro plot(dat,pr,price); proc gplot data=ResDat.&dat; title2 "&pr 时序图"; plot &price*date=1; symbol1 v=star i=join r=1 c=red; %mend plot; %plot(stk000002, 收盘价,clpr);
• 宏内可以用宏变量，还可以改变宏变量的 值。定义宏： • %macro plot; • proc gplot data=ResDat.&dat; • title2 "&pr 时序图"; • plot &price*date=1; • symbol1 v=star i=join r=1 c=red; • %mend plot;
2. 股票收益计算
股票收益分为三类:持有期收益、资本收益和累 积收益。最常用的收益是持有期收益、资本收益， 但是计算比较麻烦，这里只计算股票的相关累积 收益指标。假设某只金融资产在时刻t 的价格为Pt 单期百分比收益： Rt P t /P t 1 1
k 期百分比收益： Rt (k ) Pt / Pt k 1
计算股票收益
练习1. 自选一只股票，计算其日收益、月收 益、季收益、年收益。 练习2. 对自选的股票，计算其十年内 （2005-2015）的平均日收益、平均月收益、平 均季收益、平均年收益。这里的平均用几何平均 值,连续n期几何平均收益：
r t (1 r1 )(1 r2 )(1 rt ) 1
定义宏变量： • %let dat=stk000002; • %let pr=收盘价; • • %let price=clpr; • 调用宏plot： • • %plot; •
• • •
改变宏变量的值： %let dat=stk000002; %let pr=最高价; %let price=hipr; 再次调用宏plot： %plot; run; 以上各段程序可以连在 一起运行。
• • • • • • • • • •
%let t=%eval(2005-1995+1); data a4(keep=am gm); set a2; array col(&t) col1-col&t; array c(&t) c1-c&t; • gm=(gm0)**(1/&t))-1; gm0=1; • am=mean(of col1-col&t); do i=1 to &t; • proc print; c(i)=col(i)+1; • run; gm0=gm0*c(i); End;
• • • • • • • •
%macro a(y); data a1; p1=45*(1-(1-(1+&y)**40))/&y; p2=1000*(1/(1+&y)**40); p=p1+p2; y=200*&y; %mend a; %a(0.025);
• run;
使用宏参数的优点： 可以少写几个%let语句； 保证该宏参数变量在宏之外的程序部分不 被引用； 调用宏时并不需要知道这些宏参数的名字 ，只要知道相用宏程序语句%LET来定义宏变 量。
• %let DSN=ResDat.class; • 例中， DSN 是宏变量名， ResDat.class 为宏 变量DSN的值。 引用宏变量：在宏变量前加&来引用宏变量的 值。
•
3.1宏变量
•
%let a=ResDat.class; • data a; • set &a ; • run; • 上段程序等价于： • data a; • set ResDat.class; • run;
3.1宏变量
• • • • • 例 2： %let a=january; data; put "This is the time series plot for &A"; run;
• 例中，在引号内引用宏变量的值时必须用 双引号。因为宏处理器只能在双引号内进 行替代。
• 例3. %let a=ResDat.class; • data male; • set &a ; • if sex='M'; • proc print; • title "SUBSET OF &A"; • data female; • set &a ; • if sex='F'; • proc print; • title "SUBSET OF &A"; • run;
• • • • • • • • •
%let m=2000; %let n=1; data a; set ResDat.stk000002; where year(date)=&m and month(date)=&n; &plot; title2 "&m 年 &n 月份收盘价时序图"; run; 例中，如果不执行宏 &PLOT 步的程序时， 可将其设定为空值（%LET PLOT= ;）。
单期连续复利收益： rt ln(1 Rt ) ln(P t /P t 1 )
k期连续复利收益： rt (k ) ln(1 Rt (k )) ln(P t /P t k )
• 在计算这些收益时，观察数据是每天一个 观测，计算日收益时，每行计算出一个收 益值即可。
• • • • • •
金融计算方法与SAS
任课教师：闫霏霏 2015年9月
1.证券与股票的基本概念
• 证券： 证券是多种经济权益凭证的统称， 也指专门的种类产品，是用来证明券票持 有人享有的某种特定权益的法律凭证。它 主要包括资本证券、货币证券和商品证券 等。狭义上的证券主要指的是证券市场中 的证券产品，其中包括产权市场产品如股 票，债权市场产品如债券，衍生市场产品 如股票期货、期权、利率期货等。
data a(keep=date r1 r2 ); set resdat.idx000001; r1=dif(clpr)/lag(clpr); r2=log(clpr)-log(lag(clpr)); run; 注意计算过程中set的应用。
• 在计算周收益、季收益和年收益时， 则需要将日期变量中的周、季和年份 标记出来，并且将每周末、季末和年 末的数据查找出来再进行计算。这时 ，比较常用的一个函数就是 last.variable，它可以把按序排列后的 变量中相同值的最后一个观测标记为1.
• • • • • • • •
例4.宏变量的值为一段完整的SAS程序段。 %let plot=%str( proc gplot data=a; plot clpr*date=1; symbol1 v=star i=join r=1 c=red; run; ); 例中，必须使用%STR函数围住宏变量的值 ，在以后的程序中可以用 &PLOT 来引用这 段程序。
• • • • • •
data a7(keep=gm); set a6; t=2005-1995+1; gm=(en/be)**(1/t)-1; proc print; run;
3.宏的简介
• 宏工具是一种可以用来扩展SAS功能，减少 普通工作文本输入量的SAS工具。宏工具可 以给一段文本或SAS程序命名，并通过引用 这个名称来使用这段程序或文本。 宏工具的功能非常强大，使用宏工具来完成 以下任务。 • 使用宏变量实现文本替代； • 使用宏产生程序语句; • 使用宏循环及条件判断语句完成程序交互 。
3.2宏
宏是被编辑过的可以从SAS程序中调用的程序 。同宏变量一样，一般可以使用宏来产生文 本。 定义宏的格式： • %Macro MAC; 文本; • %mend MAC; • 用百分号%调用宏
• • • • • • • • •
例6. 定义并调用宏plot。 %macro plot; proc gplot data=ResDat.stk000002; title2 "收盘价时序图"; plot clpr*date=1; symbol1 v=star i=join r=1 c=red; %mend plot; /*以上定义宏plot*/ %plot; /*调用宏*/ run;
• • • • •
或者： data a5 ; set bb; if last_year=1 and 1995<= year(date) <= 2005; Run;
• • • • • • • •
data a6; retain be en; set a5 end=lastobs; if _n_=1 then be=clpr; if lastobs then do; en=clpr; output; end;
data r_m; set bb; if last_month=1; r1=dif(Clpr)/lag(Clpr); r2=log(clpr)-log(lag(clpr)) run;
三段类似的程序可以用 宏命令进行简化。