4

我正在尝试为孩子是否是第一个出生的虚拟变量，以及一个孩子是否是第二个出生的虚拟变量。我的数据看起来像这样

ID   MID   CMOB   CYRB      
1    1     1      1991
2    1     7      1989
3    2     1      1985
4    2     11     1985
5    2     9      1994
6    3     4      1992
7    4     2      1992
8    4     10     1983

ID = 儿童 ID，MID = 母亲 ID，CMOB = 出生月份，CYRB = 出生年份。

对于第一个出生的假人，我尝试使用这个：

Identifiers_age <- Identifiers_age %>% group_by(MPUBID) 
                          %>% mutate(first = as.numeric(rank(CYRB) == 1))

但是似乎没有办法通过另一个列的等级来打破关系（显然在这种情况下，所需的列是 CMOB），每当我尝试使用“ties.method”参数时，它都会告诉我输入必须是字符向量。

我在这里错过了什么吗？

4

2 回答 2

4

order在这里使用可能更方便，来自?order：

order 返回一个排列，它将其第一个参数重新排列为升序或降序，通过进一步的参数打破关系。

Identifiers_age <- Identifiers_age %>% group_by(MID) %>% 
                   mutate(first = as.numeric(order(CYRB, CMOB) == 1))
Identifiers_age

#Source: local data frame [8 x 5]
#Groups: MID [4]

#     ID   MID  CMOB  CYRB first
#  <int> <int> <int> <int> <dbl>
#1     1     1     1  1991     0
#2     2     1     7  1989     1
#3     3     2     1  1985     1
#4     4     2    11  1985     0
#5     5     2     9  1994     0
#6     6     3     4  1992     1
#7     7     4     2  1992     0
#8     8     4    10  1983     1
于 2016-08-06T13:54:31.527 回答
1

如果我们仍然想使用rank，我们可以将'CYRB'，'CMOB'转换为'Date'，应用rank在它上面，然后根据逻辑向量得到二进制输出

Identifiers_age %>%
         group_by(MID) %>% 
         mutate(first = as.integer(rank(as.Date(paste(CYRB, CMOB, 1,
                  sep="-"), "%Y-%m-%d"))==1))
#     ID   MID  CMOB  CYRB first
#  <int> <int> <int> <int> <int>
#1     1     1     1  1991     0
#2     2     1     7  1989     1
#3     3     2     1  1985     1
#4     4     2    11  1985     0
#5     5     2     9  1994     0
#6     6     3     4  1992     1
#7     7     4     2  1992     0
#8     8     4    10  1983     1

或者我们可以使用算术来做到这一点rank

Identifiers_age %>% 
         group_by(MID) %>%
         mutate(first = as.integer(rank(CYRB + CMOB/12)==1))
#     ID   MID  CMOB  CYRB first
#   <int> <int> <int> <int> <int>
#1     1     1     1  1991     0
#2     2     1     7  1989     1
#3     3     2     1  1985     1
#4     4     2    11  1985     0
#5     5     2     9  1994     0
#6     6     3     4  1992     1
#7     7     4     2  1992     0
#8     8     4    10  1983     1
于 2016-08-06T15:13:31.867 回答