在sas中计算累积相乘？怎么做呀？

code	date	int	r
1	20010102	0	0.1
1	20010103	1	0.2
1	20010105	2	0.1
1	20010106	3	0.2
2	20010102	0	0.3
2	20010103	1	0.2
2	20010104	2	0.1
2	20010105	3	0.1
2	20010106	4	0.2
2	20010107	5	0.2
2	20010108	6	0.1
2	20010109	7	0.1

code	date	int	r	tr
1	20010102	0	0.1	0.1
1	20010103	1	0.2	0.02
1	20010105	2	0.1	0.002
1	20010106	3	0.2	0.0004
2	20010102	0	0.3	0.3
2	20010103	1	0.2	0.06
2	20010104	2	0.1	0.006
2	20010105	3	0.1	0.0006
2	20010106	4	0.2	0.00012
2	20010107	5	0.2	0.000024

要求是根据第一个计算出第二个表格中的tr
其中tr是各个code中r的累积相乘


向高手致敬！

1. data b;
   
2.         retain code date int r tr 1;
   
3.         set a;
   
4.         by code date;
   
5.         if first.code then tr=1;
   
6.         tr=tr*r;
   
7. run;

复制代码

tr=r的话，下面那步tr=tr*r会使得第一条自我累乘一次
即整个累乘序列都多乘第一条一次

为什么要retain那么多变量？
在金融里计算股票的累计非正常收益率CAR，大都是这个过程。
proc sort data=a;
      by code date;
run;
data b;
        set a;
        retain  tr ;
        if first.code then tr=r;
        else tr=tr*r;
        by code;
run;

4# hongxx

想问个类似的问题，如果R是字符型的， TR也是字符型的（长度足够），
然后我TR = TR*R 那里变成 TR = TR||’，‘||R，为什么出来的总是不是我预期的呢？

我预期的是第一个是TR = ’0.1‘，第二个TR = ’0.1，0.2‘，可是我现在出来的结果，第一个，第二个都是0.1，请问这个是什么原因呢？

proc sort data=a;
      by code date;
run;
data b;
length tr $ 50;
        set a;
        retain  tr ;
        if first.code then tr=r;
        else tr=tr||‘，‘||r;
        by code;
run;

另外，还有一个问题，这个BY CODE，可以放在SET A之后么？

else tr＝cats( tr, ',',r)

你想串在一起，总得把空格去掉吧。

一般的by 语句都是放在最first.variable或者last.variable之后吧，这样好读一些。一般SAS的编程习惯是这样。
而且by 只能放set 之后。

6# hongxx

知道了。。。应该是TR = STRIP(TR)||STRIP(R)。。。。

否则长度有问题了。。。。

7# hongxx
THANKS A LOT!