使用SAS中的keep语句在组内创建相同的值

时间:2018-11-09 17:24:40

标签: sas retain

我正在尝试基于一个组中第一个观测值的两个变量X和Y的值创建一个将在组内采用相同值的变量z。根据组中第一个观测值的X和Y值,一个组可以获取4个Z值。

Z=1 (if X=1 & Y=1), 
Z=2 (if X=2 & Y=1),
Z=3 (if X=1 & Y=2), and 
Z=4 (if X=2 & Y=2). 

这就是我所拥有的,我想要的。

X has two values, 1 or 2, within a group; while Y can take 1, 2 ,3. 
Y is sorted in ascending order 
if the first (or all group observations) take a value of 3, the resulting Z 
value should be set to missing  

这就是我所拥有的:

Obs    Group          X            Y
1      10600          1            1
2      10600          1            2
3      10600          1            3
4      10800          2            1
5      10800          2            3
6      10900          1            2
7      10900          1            3
8      11100          2            2
9      11100          2            2
10     11100          2            3
11     11100          2            2
12     11200          2            3
13     11300          2            1
14     11300          2            2
15     11300          1            3
16     11300          1            3
17     11300          1            3
18     11300          1            3

这就是我想要的:

Obs    Group          X            Y         Z
1      10600          1            1         1
2      10600          1            2         1
3      10600          1            3         1
4      10800          2            1         2
5      10800          2            3         2
6      10900          1            2         3
7      10900          1            3         3
8      11100          2            2         4
9      11100          2            2         4
10     11100          2            3         4
11     11100          2            2         4
12     11200          2            3         .
13     11300          2            1         2
14     11300          2            2         2
15     11300          1            3         .
16     11300          1            3         .
17     11300          1            3         .
18     11300          1            3         .

谢谢!

2 个答案:

答案 0 :(得分:1)

您正确的是,retain变量将在数据步骤的正向迭代中携带一个值。名义上,一个带有单个set语句的简单数据步骤将与数据集中的一行相对应。

您的保留变量将在组开始时分配,因此您将需要一个by语句,这将使一个自动标志变量first.<by-group-var>可用。

data have; input
Group  X Y; datalines;
10600  1 1
10600  1 2
10600  1 3
10800  2 1
10800  2 3
10900  1 2
10900  1 3
11100  2 2
11100  2 2
11100  2 3
11100  2 2
11200  2 3
11300  2 1
11300  2 2
11300  1 3
11300  1 3
11300  1 3
11300  1 3
run;

最后一组包含group=11300的行包含x=2,后跟x=1。您的叙述

  

在组内

传达了一个想法,但并没有明确的精确性。实际分组(基于所显示的需求)似乎是groupx的组合。因此,您将需要一个

by group x notsorted;

声明。 notsorted将根据值的连续性而不是值的显式顺序来设置first.last.的数据步骤。

data want;
  set have;
  by group x nostsorted;
  retain z;
  if first.x then do;  * detect first row in combinations "group/x";
    select;
      when (X=1 & Y=1) Z=1;  * apply logic for retained value;
      when (X=2 & Y=1) Z=2;
      when (X=1 & Y=2) Z=3;
      when (X=2 & Y=2) Z=4;
      otherwise Z=.;
    end;
  end;
  logic_tracker_first_x = first.x;
run;

ods listing; options nocenter;
proc print data=want;
run;

显示输出窗口

                               logic_tracker_
Obs    Group    X    Y    z      first_x

  1    10600    1    1    1           1
  2    10600    1    2    1           0
  3    10600    1    3    1           0
  4    10800    2    1    2           1
  5    10800    2    3    2           0
  6    10900    1    2    3           1
  7    10900    1    3    3           0
  8    11100    2    2    4           1
  9    11100    2    2    4           0
 10    11100    2    3    4           0
 11    11100    2    2    4           0
 12    11200    2    3    .           1
 13    11300    2    1    2           1
 14    11300    2    2    2           0
 15    11300    1    3    .           1
 16    11300    1    3    .           0
 17    11300    1    3    .           0
 18    11300    1    3    .           0

答案 1 :(得分:1)

请尝试使用以下解决方案,我使用了更简单的方法,即每个组仅保留First Z变量,然后对同一数据集进行左连接以在同一组的其余观测值中保留First z变量-

data test;
input group 5. x 1. y 1.;
if x=1 and y=1 then z=1;
else if x=2 and y=1 then z=2;
else if x=1 and y=2 then z=3;
else if x=2 and y=2 then z=4;
datalines;
1060011
1060012
1060013
1080021
1080023
1090012
1090013
1110022
1110022
1110023
1110022
1120023
1130021
1130022 
1130013
1130013
1130013
1130013
;
run;

data test1;
 set test;
 keep group x z;
run;

proc sort data=test1; by group x; run;

data keep_first;
 set test1;
  by group x;
  if first.group or first.x;
run;

proc sql;
create table final
as
select a.group, a.x, a.y, b.z
from test a
left join keep_first b
on a.group=b.group
and a.x=b.x
order by a.group, a.y, a.x;
quit;