请问计算收益率的程序，哪里出错了？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

data a;
input ticker $ date mmddyy10. price;
format date mmddyy10.;
cards;
ABC   1/1/2002  10
ABC   1/2/2002  11
ABC   1/5/2002  12
ABC   1/6/2002  13
ABC   1/7/2002  14
DEF   1/1/2002  9
DEF   1/2/2002  11
DEF   1/5/2002  13
DEF   1/6/2002  15
DEF   1/7/2002  18
;
run;
data a1;
set a;
by ticker date;
if first.ticker=1 then seq=1;
else seq+1;
run;
%let l=1;
data a2;
do i=1 to n;
set a1 point=i nobs=n;
if (seq le &l.) then do;
return=.;
output;
end;
else  do;
return=price/lag&l.(price)-1;
output;
end;
end;
stop;
run;
想要以ticker和date排序，得到同样的ticker下price/lag&l.(price)-1的值，但是结果不对。数据是论坛里的。多谢了！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：哪里出错了 收益率 ticker RETURN output 程序 收益率

自己先顶了啊

很专业，不是很懂

帮帮忙吧，多谢啦，不知说清楚没有，可以运行一下试试。谢谢啦

接着顶。。。。。。。。。。

不懂………………

请问楼上哪里不懂啊？谢谢

你的目的是什么？另外在你第三个data步里，你的n没有赋值怎么能循环呢。

错在LAG
因为LAG是没有分组
但是你希望得到是分组的
所以出现问题了

data a;
input ticker $ date mmddyy10. price;
format date mmddyy10.;
cards;
ABC   1/1/2002  10
ABC   1/2/2002  11
ABC   1/5/2002  12
ABC   1/6/2002  13
ABC   1/7/2002  14
DEF   1/1/2002  9
DEF   1/2/2002  11
DEF   1/5/2002  13
DEF   1/6/2002  15
DEF   1/7/2002  18
;
run;
data crackman;
set a;
by ticker date;
lag=lag(price);
if first.ticker=1 then lag=.;
return=price/lag-1;
format return f8.2;
drop lag;
run;

/*
%let l=1;
data a2;
do i=1 to n;
set a1 point=i nobs=n;
if (seq le &l.) then do;
return=.;
output;
end;
else  do;
return=price/lag&l.(price)-1;
output;
end;
end;
stop;
run;
*/