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)

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