求教 行相除

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

原表

Year	Item	P
2001	a	100
2002	a	130
2003	a	150
2004	a	170
2001	b	210
2002	b	220
2003	b	230
2004	b	210
2001	c	150
2002	c	200
2003	c	203
2004	c	300

如何新增一列

Year	Item	P	growth
2001	a	100
2002	a	130	0.3 (=130/100-1)
2003	a	150	0.153846
2004	a	170	0.133333
2001	b	210
2002	b	220	0.047619
2003	b	230	0.045455
2004	b	210	-0.08696
2001	c	150
2002	c	200	0.333333
2003	c	203	0.015
2004	c	300	0.477833

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Growth item Temp year GROW 如何

1. DATA m;
   
2. INPUT Year $ Item $ P;
   
3. x= lag(p);
   
4. CARDS;
   
5. 2001 a 100
   
6. 2002 a 130
   
7. 2003 a 150
   
8. 2004 a 170
   
9. 2001 b 210
   
10. 2002 b 220
    
11. 2003 b 230
    
12. 2004 b 210
    
13. 2001 c 150
    
14. 2002 c 200
    
15. 2003 c 203
    
16. 2004 c 300
    
17. ;
    
18. run;
    
19. 
    
20. data m_1;
    
21.     set m;
    
22.         by item notsorted;
    
23.         if first.item then x = .;
    
24.         if x ^=. then growth = round(p/x-1,0.000001);
    
25.         drop x;
    
26. run;

复制代码

data a;
input Year Item $ P;
cards;
2001        a        100
2002        a        130
2003        a        150
2004        a        170
2001        b        210
2002        b        220
2003        b        230
2004        b        210
2001        c        150
2002        c        200
2003        c        203
2004        c        300
;
run;
proc sort data =a ;
    by item;
run;

data b;
set a;
    by item;
    x=lag(p);
    if not first.item then y=round(p/x,0.000001)-1;
    drop x;
run;
既然写了，也贴一下吧，哈

挺简单的，就是用lag函数

caicaierfeng 发表于 2013-9-5 14:53
data a;
input Year Item $ P;
cards;

lag函数式做什么？

妖帝东皇 发表于 2013-9-5 20:52
lag函数式做什么？

返回前一次执行的观测值，前一次在这个例子里就是前一行，即返回前一行P的值。

caicaierfeng 发表于 2013-9-6 09:21
返回前一次执行的观测值，前一次在这个例子里就是前一行，即返回前一行P的值。

谢谢！！