请教高手如何将频数小于3的观察值用缺失值替换

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请问如何将频数小于3的观察值用缺失值替换，如将下例中的4和5用“. ”代替

data a;
input x1 x2 ;
cards;
1 2
2 3
3 2
1 2
3 4
1 0
1 0
2 3
1 3
4 1
1 5
;
run;

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：请教高手 缺失值 cards Input Data 如何

xgnfly 发表于 2010-5-6 21:18
请问如何将频数小于3的观察值用缺失值替换，如将下例中的4和5用“. ”代替

data a;
input x1 x2 ;
cards;
1 2
2 3
3 2
1 2
3 4
1 0
1 0
2 3
1 3
4 1
1 5
;
run;

是一个变量还是两个变量啊，那第二列的0，1合不合条件呢？

sushe1527 发表于 2010-5-6 21:57

xgnfly 发表于 2010-5-6 21:18
请问如何将频数小于3的观察值用缺失值替换，如将下例中的4和5用“. ”代替

data a;
input x1 x2 ;
cards;
1 2
2 3
3 2
1 2
3 4
1 0
1 0
2 3
1 3
4 1
1 5
;
run;

是一个变量还是两个变量啊，那第二列的0，1合不合条件呢？

不好意思，是两个变量，0、1也是。 如有一个变量的解决方法也请提供!

data a;
input x1 x2 ;
x1=ifn(x1<=3,x1,.);
x2=ifn(x2<=3,x2,.);
cards;
1 2
2 3
3 2
1 2
3 4
1 0
1 0
2 3
1 3
4 1
1 5
;
run;

crackman 发表于 2010-5-6 22:18
data a;
input x1 x2 ;
x1=ifn(x1

请问楼上的我的SAS显示ifn有错误，是否是因我的SAS版本8.0较低，还是什么原因，另如有几十个变量有没有更简单的方法。多谢!

第一个 肯定是你的版本有问题
我的是9.2
第二个 你的问题是什么意思呢？是说X1 X2里面 如果说某一个值的频数小于3了 就换成缺失值，例如X1有6个1，频数大于3了，那岂不是把1都换成缺失值？还是大于3的 如 4和5换成缺失值？

6# crackman

我的问题是说X1、 X2每列里面 如果说某一个值的频数小于3了就换成缺失值，例如X1有6个1，频数大于3了就不把1换成缺失值，相反4的频数小于3次就换成缺失值。

等于3呢？

data a;
input x1 x2 x3 x4 x5 x6 x7 x8;
obs=_n_;
cards;
1 2 0 6        3 4        2 2
2 3 2 3        1 0        4 1
3 2 1 2        2 3        1 6
1 3        1 7 4 1        2 6
1 2        2 3        1 0        1 1
3 4        2 2        3 4        2 2
1 0        4 1        2 3        1 6
1 3        1 7        1 5        9 5
4 1        2 6        3 6 7 4
3 2 1 2        2 3        1 6
1 3        1 7 4 1        2 6
1 2        2 3        1 0        1 1
3 4        2 2        3 4        2 2
9 9 9 9 9 9 9 9
;
run;
%macro a(var);
data b;
set a;
proc sort data=b (keep=&var. obs);
by &var. ;
run;
data &var.;
set b;
by &var.;
if first.&var.=1 then do;
idx=1;
end;
else idx+1;
run;
proc sql;
create table &var. as select * ,max(idx) as num from &var. group by &var. ;
data &var.;
set &var.;
if num<3 then &var. =.;
drop num idx;
run;
quit;
%mend a(var);
%macro b;
%do i=1 %to 8;
%a(x&i.);
%end;
%mend b;
%b;
data result;
merge x1-x8;
run;

crackman 发表于 2010-5-7 01:09
data a;
input x1 x2 x3 x4 x5 x6 x7 x8;
obs=_n_;
cards;
1 2 0 6        3 4        2 2
2 3 2 3        1 0        4 1
3 2 1 2        2 3        1 6
1 3        1 7 4 1        2 6
1 2        2 3        1 0        1 1
3 4        2 2        3 4        2 2
1 0        4 1        2 3        1 6
1 3        1 7        1 5        9 5
4 1        2 6        3 6 7 4
3 2 1 2        2 3        1 6
1 3        1 7 4 1        2 6
1 2        2 3        1 0        1 1
3 4        2 2        3 4        2 2
9 9 9 9 9 9 9 9
;
run;
%macro a(var);
data b;
set a;
proc sort data=b (keep=&var. obs);
by &var. ;
run;
data &var.;
set b;
by &var.;
if first.&var.=1 then do;
idx=1;
end;
else idx+1;
run;
proc sql;
create table &var. as select * ,max(idx) as num from &var. group by &var. ;
data &var.;
set &var.;
if num

merge应先根据obs排序
另我的版本 merge x1-x8用不起来
我修改了您的程序能给出正大确结果，但日志中提示有错误，请帮看一下错在那里
data a;
input x1 x2 x3 x4 x5 x6 x7 x8;
obs=_n_;
cards;
1 2 0 6 3 4 2 2
2 3 2 3 1 0 4 1
3 2 1 2 2 3 1 6
1 3 1 7 4 1 2 6
1 2 2 3 1 0 1 1
3 4 2 2 3 4 2 2
1 0 4 1 2 3 1 6
1 3 1 7 1 5 9 5
4 1 2 6 3 6 7 4
3 2 1 2 2 3 1 6
1 3 1 7 4 1 2 6
1 2 2 3 1 0 1 1
3 4 2 2 3 4 2 2
9 9 9 9 9 9 9 9
;
run;
%macro a(var);
data b;
set a;
proc sort data=b (keep=&var. obs);
by &var. ;
run;
data &var.;
set b;
by &var.;
if first.&var.=1 then do;
idx=1;
end;
else idx+1;
run;
proc sql;
create table &var. as select * ,max(idx) as num from &var. group by &var. ;
data &var.;
set &var.;
if num<3 then &var. =.;
drop num idx;
run;
proc sort data=&var.;
by obs;
run;
quit;
%mend a(var);
%macro b;
%do i=1 %to 8;
%a(x&i.);
if i=1 then do ; data result;set x&i.;end;
else if do;data result;merge result x&i.;run;end;
%end;
%mend b;
%b;