求助：sas缺失值替换

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

data a;         input x;
cards;
1
.
4
56
3
.
6
3
;
run;
将这组数据中的缺失值用这一组的均值替换；
谢谢帮助～

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：缺失值 cards Input Data card 求助 SAS 缺失

1. data b;
   
2.         retain avg;
   
3.         if _N_=1 then do until(EOF);
   
4.                 set a END=EOF NOBS=NOBS;
   
5.                 sum+x;
   
6.                 cnt+(x^=.);
   
7.                 if EOF then avg=sum/NOBS; *非缺省改为 avg=sum/cnt;
   
8.         end;
   
9.         set a;
   
10.         if x=. then xx=avg;
    
11.         else xx=x;
    
12.         keep x xx;
    
13. run;

复制代码

2# soporaeternus 太感谢了，想好几天了

proc sql;
select avg(x) into :mean from a;
quit;

data a;
set a;
        if x=. then x=&mean;
run;

楼上的 你的语句你自己运行了没？貌似有点问题

5# pccbanboo11
谢谢关注。sas的均值是所有未缺失值的平均，也就是73/6, 而不是73/8，你说的是这意思吗？还是别的什么？

6# sas_user 谢谢你，我将你的程序应用了还不错，下面是我要写的程序：options mprint;  %macro data_avg;
       %let a=%str(B20,B21,J11,J12,J13,J13A,J14,J15,J16,J17,J17A,J18,J36);
          %do i=1 %to 13;
             %let x=%scan(&a,&i);
                %do q=5 %to 17;
                   %do p=1 %to 12;
                    proc sql;

       select avg(_COL&q) into:mean

   from fenxi.b

   where _COL0="&x" and mon=&p;

  quit;

  data a;

       set a;

   if  _COL0="&x" and mon=&p and _COL&q=. then _COL&q=&mean;

  run;
                   %end;
            %end;
      %end;
%mend;
%data_avg

2# soporaeternus
我想请教一下，程序里的  if  _n_=1 有什么作用？我把它去掉了，为什么结果就不对了呢？麻烦，多谢解答。

8# zhaoping603 我试着回答一试试，数据录入的data步是自动循环的，_N_=1是每次循环的开始

就是仅在第一次data步循环的时候
就是在最开始计算下均值，之后再逐个读入数据来填充