请教，求出一个序列的价格

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

Date	R	P
d1	r1
d2	r2
d3	r3
d4	r4
d5	r5	p5

请教各位高手，已经知道一个收益率序列和第五天的价格，p（t-1）=p（t）/(r（t）+1)，需要求出p4到p1的价格，如何编写？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：收益率序列 date 收益率 ERP ATE 收益率 如何

人生海海 发表于 2010-2-24 11:27

Date	R	P
d1	r1
d2	r2
d3	r3
d4	r4
d5	r5	p5

请教各位高手，已经知道一个收益率序列和第五天的价格，p（t-1）=p（t）/(r（t）+1)，需要求出p4到p1的价格，如何编写？

data t1;
day=5; r=0.05;p=5;    output;
day=4; r=0.04;p=.;    output;
day=3; r=0.03;p=.;    output;
day=2; r=0.02;p=.;    output;
day=1; r=0.01;p=.;    output;
run;

data t2;
   set t1;
   retain p2;
   if _n_=1 the p2=p;
   else p2=p2/(r+1);
run;


proc print; run;

学习了 谢谢

貌似程序有问题

1. data a;
   
2.    infile datalines missover;
   
3.    input date : $10. r p;
   
4.    datalines;
   
5.    2010-02-01 1
   
6.    2010-02-02 2
   
7.    2010-02-03 3
   
8.    2010-02-04 4
   
9.    2010-02-05 5 30
   
10.    ;
    
11. run;
    
12. 
    
13. proc sort data=a;
    
14.     by  descending date descending r;
    
15. run;
    
16. 
    
17. data b(rename=(p1=p));  
    
18.     set a;
    
19.     retain p1;
    
20.         r1=lag(r);
    
21.         if _n_=1 then p1=p;
    
22.         else  p1=p1/(r1+1);
    
23.         keep  date r p1;
    
24. run;

复制代码

4# 醉_清风

1. 
   
2. data t2;
   
3.    set t1;
   
4.    retain p2 r1;
   
5.    if _n_=1 then do;
   
6.   p2=p;
   
7. end;
   
8.    else p2=p2/(r1+1);
   
9.    r1=r;
   
10. run;

复制代码

bobguy的程序稍微改动下就可以了，他貌似用了r(t-1)......

学习了 谢谢

学习了，谢谢ls各位高手！