sas编程问题，大侠帮忙做出这个结果

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

原数据程序如下

1. data a;
   
2. input name $        date $        price1;
   
3. cards;
   
4. a        20080101        23
   
5. a        20080102        43
   
6. a        20080103        134
   
7. a        20080104        43
   
8. a        20080105        243
   
9. a        20080106        43
   
10. a        20080107        32
    
11. a        20080108        4
    
12. b        20080101        324
    
13. b        20080102        3
    
14. b        20080103        43
    
15. b        20080104        23
    
16. b        20080105        3
    
17. b        20080106        32
    
18. ;
    
19. run;

复制代码

price1指的是昨日价格，今日价格用price表示，另外还要求出一个变量叫因子，公式是昨日价格/今日价格*昨日因子，因子初始值为1
我想要的结果是这样的：name date price1 price  yinzi

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：sas编程问题 SAS编程 Price cards Input price 程序

用一个笨办法，将date设为num，用滞后，效率不高，也许合乎要求：
data a;
input name $        date        price;
if name="a" then date2=lag(date);
    else if name="b" then date2=lag(date);
else;
cards;
a        20080101        23
a        20080102        43
a        20080103        134
a        20080104        43
a        20080105        243
a        20080106        43
a        20080107        32
a        20080108        4

b        20080101        324
b        20080102        3
b        20080103        43
b        20080104        23
b        20080105        3
b        20080106        32
;
run;

2# yvh74 可是我的数据量有几百万，name有几千个名字

呵呵，要不我笨呢。事实上电脑挺快的。我曾遇见过更大样本的数据，呵呵，笨办法搞定算了。

再来一下(前提是日期连续）：
data a;
input name $        date        price;
pr=price;
datelag=lag(date);
if date-datelag ne 1 then pr=.;
else;
cards;
a        20080101        23
a        20080102        43
a        20080103        134
a        20080104        43
a        20080105        243
a        20080106        43
a        20080107        32
a        20080108        4
b        20080101        324
b        20080102        3
b        20080103        43
b        20080104        23
b        20080105        3
b        20080106        32
;
run;

proc print;
run;

                                  1     a      20080101      23       .           .
                                  2     a      20080102      43      43    20080101
                                  3     a      20080103     134     134    20080102
                                  4     a      20080104      43      43    20080103
                                  5     a      20080105     243     243    20080104
                                  6     a      20080106      43      43    20080105
                                  7     a      20080107      32      32    20080106
                                  8     a      20080108       4       4    20080107
                                  9     b      20080101     324       .    20080108
                                 10     b      20080102       3       3    20080101
                                 11     b      20080103      43      43    20080102
                                 12     b      20080104      23      23    20080103
                                 13     b      20080105       3       3    20080104
                                 14     b      20080106      32      32    20080105

5# yvh74 可是日期是不连续的，我做的是股票，股票周六周日是不开盘的，而且就算是连续的话，2月份的减去一月份的数据也不对啊，还有就是原数据里日期是字符型的。原数据是给你的，相当于直接用a这个数据集做分析。帖子我稍微修改了一下。呵呵不过辛苦了，非常感谢

先抱歉一个，关于股票这方面知识比较欠缺，price1 是昨日价格，那好比对第二行数据：
a        20080102        43
就是说2008年1月2日，a 产品的“昨日价格”是43，即2008年1月1号的实际（今日）价格是43么？
就是将所有的 price1 前移一位就得到 price （今日价格）么？
或者楼主能否给出部分你想要的结果表看一下？

1. data a;
   
2. input name $ date $ price1;
   
3. date1=mdy(substr(date,5,2),substr(date,7,2),substr(date,1,4));
   
4. format date1 yymmdd10.;
   
5. drop date;
   
6. cards;
   
7. a        20080101        23
   
8. a        20080102        43
   
9. a        20080103        134
   
10. a        20080104        43
    
11. a        20080105        243
    
12. a        20080106        43
    
13. a        20080107        32
    
14. a        20080108        4
    
15. b        20080101        324
    
16. b        20080102        3
    
17. b        20080103        43
    
18. b        20080104        23
    
19. b        20080105        3
    
20. b        20080106        32
    
21. ;
    
22. proc sort data=a(rename=(date1=date));
    
23.         by name descending date;
    
24. run;
    
25. data a;
    
26.         set a;
    
27.         by name;
    
28.         price=lag(price1);
    
29.         if first.name then price=.;
    
30. run;
    
31. proc sort data=a;
    
32.         by name date;
    
33. run;
    
34. data a;
    
35.         set a;
    
36.         by name;
    
37.         retain factor;
    
38.         if first.name then factor=price1/price;
    
39.         else factor=price1/price*factor;
    
40. run;
    
41. proc sql;
    
42.         create table a as
    
43.         select name,date,price1,price,factor
    
44.         from a;
    
45. quit;

复制代码

7# hssnow 你的理解是对的，就是上移一个

8# baoaibaobao

1. name        date        price        price1        yinzi        
   
2. a        20080101        23        43        43/23*1=1.869565        1.869565217
   
3. a        20080102        43        134        134/42*1.869565=5.964803        5.964802619
   
4. a        20080103        134        43               
   
5. a        20080104        43        243               
   
6. a        20080105        243        43               
   
7. a        20080106        43        32               
   
8. a        20080107        32        4               
   
9. a        20080108        4                        
   
10. b        20080101        324        3               
    
11. b        20080102        3        43               
    
12. b        20080103        43        23               
    
13. b        20080104        23        3               
    
14. b        20080105        3        32               
    
15. b        20080106        32                        

复制代码

这是我想要的结果，我把因子的计算公式写出来了
因子初始值是1只是在计算的第一个值是1而不是因子的第一个值就是1name是股票名，每只股票因子初始值是1