求助：数据分组处理

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

分组处理var1，如果组中var2的最后一个值为6，则输出新的数据集new1（否则输出新的数据集new2）.用data步怎么编呢？
下面是数据的形式：

Obs	var1	var2
1	A	z
2	A	y
3	A	x
4	A	t
5	B	s
6	B	d
7	C	f
8	C	g
9	C	h

扫码加我 拉你入群

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

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

分享0 收藏1 回帖

关键词：数据分组 data步 Data SVAR 最后一个

大家帮帮忙

试试吧，不知道可行：
data new1 new2;
   set new;
   by var1;
   if last.var1 & var2=6 then output new1;
   else output new2;
run;

是分组的，var1中的A为一组，B,C也一样。还是不行啊，不过还是谢谢了

你上面var2不是字符型的么？怎么会有var2=6？

Try this.

data test01;
        input var1 $ var2 $;
cards;
A z
A y
A x
A 6
B s
B d
C f
C g
C h
;run;
data test02;
        set test01;
        fid + 1;
run;
proc sort data = test02;
        by var1 descending fid;
run;
data new1(drop = fid flag)
          new2(drop = fid flag) ;
        retain flag 0;
        set test02;
        by var1;
        if first.var1 and var2 = '6' then flag = 1;
        if flag = 1 then output new1;
        else output new2;
        if last.var1 then flag = 0;
run;

变量1  变量2
001      12
001       1
001       2
002       2
002       3
002       4
003       2
003       3
003       4
003       5
003       6
其中，003中变量2的最后一个值为6，就把003这一组挑选出来，就是这么个意思

maidenhan 发表于 2012-2-20 17:15
Try this.

data test01;

变量1  变量2
001      12
001       1
001       2
002       2
002       3
002       4
003       2
003       3
003       4
003       5
003       6
其中，003中变量2的最后一个值为6，就把003这一组挑选出来，就是这么个意思

yugao1986 发表于 2012-2-20 15:48
试试吧，不知道可行：
data new1 new2;
   set new;

变量1  变量2
001      12
001       1
001       2
002       2
002       3
002       4
003       2
003       3
003       4
003       5
003       6
其中，003中变量2的最后一个值为6，就把003这一组挑选出来，就是这么个意思

data new;
   input var1 var2;
   cards;
001      12
001       1
001       2
002       2
002       3
002       4
003       2
003       3
003       4
003       5
003       6
;
run;
data new1;
    set new;
        by var1;
        if last.var1 & var2=6 then output;
run;
proc sql;
    create table need as
        select new.var1,new.var2
        from new
        inner join
        new1
        on new.var1=new1.var1;
quit;
proc print data=need;run;