求助:计算移动平均数的问题?

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求助:计算移动平均数的问题?

        如有下列数据，怎样按beibie(类别)计算3期移动平均数？
data a;
input leibie $ y @@;
cards;
a 2 a 3 a 5 a 7 a 1 a 4 a 8
b 6 b 4 b 8 b 7 b 2 b 9
c 7 c 3 c 4 c 2 c 6 c 1
;
run;
data b;
set a;
by leibie;
if first.leibie then  y_sum = 0;
y_sum+y;
run;

如果用这句 y3=(y_sum-lag3(y_sum))/3;  那么只有a类的3期移动平均数是对的。
后面类别的头3个都是错的，应该是空值。
由于数据集中的类别比较多（几千个），不好分开。

请教该如何计算？ 谢谢！！

扫码加我 拉你入群

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

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

分享0 收藏2 回帖

关键词：移动平均 平均数 Input cards First 平均数 如何

按你每三个算平均数，那每组前三个不是正好能算一个数么？为什么是每组前三个空，而不是前两个空呢？

data a;
input leibie $ y @@;
n=1;
cards;
a 2 a 3 a 5 a 7 a 1 a 4 a 8
b 6 b 4 b 8 b 7 b 2 b 9
c 7 c 3 c 4 c 2 c 6 c 1
;
run;
proc sql;    /*判断每组至少3个数的，且排序*/
create table b as select * from a group by leibie having count(*)>=3;quit;

data b;
set b;
by leibie;
if first.leibie then  y_sum = 0;
y_sum+y;
y3=(y_sum-lag3(y_sum))/3;
retain m;
m+n;
if first.leibie then m=n;
if m in(1,2) then y3=.;
if m=3 then y3=y_sum/3;
run;

谢谢回复!
按照您的思路完成，谢谢！！！

3# tianlai888

1. 
   
2. data a;
   
3. input leibie $ y @@;
   
4. cards;
   
5. a 2 a 3 a 5 a 7 a 1 a 4 a 8
   
6. b 6 b 4 b 8 b 7 b 2 b 9
   
7. c 7 c 3 c 4 c 2 c 6 c 1
   
8. d 1 d 2
   
9. e 3 e 4
   
10. f 5 f 6 f 7
    
11. g 8
    
12. ;
    
13. run;
    
14. data b1;
    
15. set a;
    
16. by leibie;
    
17. if first.leibie then n=0;
    
18. n+1;
    
19. y_sum+y;
    
20. dif3=dif3(y_sum);
    
21. if  n<3 then ma3=.;
    
22.   else if n=3 & _n_=3 then ma3=y_sum/3;
    
23.    else ma3=dif3/3;
    
24. drop n y_sum dif3;
    
25. run;

复制代码

如果只是在同一类别里每三个求一次平均数的话。不过moving average应该要更复杂吧，不懂。

见此贴 http://blog.sina.com.cn/s/blog_6a90ae320100o1ay.html

PROC EXPAND

data a;
input leibie $ y @@;
cards;
a 2 a 3 a 5 a 7 a 1 a 4 a 8
b 6 b 4 b 8 b 7 b 2 b 9
c 7 c 3 c 4 c 2 c 6 c 1
;
run;

proc expand data=a out=b method=none;
  by leibie;
  CONVERT y = MA_y / TRANSFORM=( MOVAVE 3 TRIMLEFT 2);
RUN;

BraveMadMan 发表于 2012-7-20 15:29
data a;
input leibie $ y @@;
cards;

这个为最简单的正解

BraveMadMan 发表于 2012-7-20 15:29
data a;
input leibie $ y @@;
cards;

请问，如果我用proc expand求滚动方差的话该怎么用呢？菜鸟一个，求大神赐教！

movave 3 替换为movstd 3即可