计算xirr 急！在线等！

数据格式是：

id         date             value
1         2013/1/1        －200
1         2013/2/14        50
1        2013/4/15        120
2        2013/2/2         -50
2        2013/3/4         20
2        2013/4/1          25
……

我想要计算每个id的xirr，试了好多天都没有成功，有谁可以帮我解决吗？在线等，急！真的谢谢大家了！！

yingxin0824 发表于 2015-1-22 09:51
已经发送到您的邮箱，thank you sooooooooooooooooooooooooooooooooooooooooo much!!!!

你好问题解决没？我的论坛币。。谢谢！

如果每个id的VALUE均为三个，楼主可以试试以下方法：

proc datasets lib=work memtype=data nolist kill;
quit;

data finace;
input id date yymmdd10. value;
cards;
1 2013/01/01    -200
1 2013/02/14    50
1 2013/04/15    120
2 2013/02/02    -50
2 2013/03/04    20
2 2013/04/01    25
run;

proc sort data=finance;
        by id;
run;

data finace1;
        set finace;
        by id;
        if first.id then ord=0;
        ord+1;
run;

proc sort data=finace1;
        by id ord;
run;

%macro finace(dout=, var=, name= );

proc transpose data=finace1 out=&dout.(drop=_name_) prefix=&name.;
        id ord;
        by id;
        var &var.;
run;

proc sort data=&dout.;
        by id;
run;

%mend;

%finace(dout=finace2, var=value, name=v);
%finace(dout=finace3, var=date, name=d);

data fin;
        merge finace2 finace3;
        by id;
run;

data rate(keep=id rate);
        set fin;
        rate = finance('xirr', v1, v2, v3, d1, d2, d3, 0.1);
run;

冷秋 发表于 2015-1-21 16:43
如果每个id的VALUE均为三个，楼主可以试试以下方法：

proc datasets lib=work memtype=data nolist kill ...

您好，关键是每个id对应的数量都不是一样的，这应该怎么解决呢？真的急需要您的帮助，谢谢您！

冷秋 发表于 2015-1-21 16:43
如果每个id的VALUE均为三个，楼主可以试试以下方法：

proc datasets lib=work memtype=data nolist kill ...

而且有些数量非常多，上千个。

只要每个ID的数量相同就可以做；不同的话可以对数量相同的ID进行分组，再把最终的结果用set语句连接到一起就行了！

冷秋 发表于 2015-1-21 17:49
只要每个ID的数量相同就可以做；不同的话可以对数量相同的ID进行分组，再把最终的结果用set语句连接到一起就 ...

下面这个公式难道要把 v1,v2,……这些全部都列出来吗？

rate = finance('xirr', v1, v2, v3, d1, d2, d3, 0.1);

这个函数不怎么熟悉,看看能不能用of,而不一个个列出来.你也可以把原始数据发给我,明天上班帮你看看

冷秋 发表于 2015-1-21 19:19
这个函数不怎么熟悉,看看能不能用of,而不一个个列出来.你也可以把原始数据发给我,明天上班帮你看看

你好，请问怎样发给您呢？数据比较大

yingxin0824 发表于 2015-1-21 19:36
你好，请问怎样发给您呢？数据比较大

if _n_<500  你可以给他发一部分的 没必要全发