在SAS中计算移动平均值

/* 创建示例数据集 */
data have;
   input date date9. value;
   format date date9.;
   datalines;
01JAN2022 10
02JAN2022 15
03JAN2022 12
04JAN2022 18
05JAN2022 20
06JAN2022 16
07JAN2022 14
08JAN2022 11
09JAN2022 13
10JAN2022 17
;

/* 计算移动平均值 */
data want;
   set have;
   retain sum 0 count 0;
   lag_value = lag(value);
   
   /* 计算移动平均值 */
   if not missing(lag_value) then do;
      sum = sum - lag_value + value;
      count = min(count+1, 3); /* 设置时间窗口大小为3 */
   end;
   if count = 3 then do;
      moving_avg = sum / count;
      output;
   end;
   drop lag_value sum count;
run;

/* 打印结果 */
proc print data=want;
run;