r - 条件和分组变异 dplyr

Question

假设我有以下每个抽屉 socks 增加的数据

>socks
year  drawer_nbr  sock_total
1990    1           2
1991    1           2
1990    2           3
1991    2           4
1990    3           2
1991    3           1

我想要一个二进制变量来标识每个抽屉中的 socks 是否增加了。如果增加则为 1，否则为 0。结果会是

>socks
drawer_nbr  growth
  <dbl>     <factor>
    1          0  
    2          1
    3          0

我一直在比较一年的 sock_total 和另一年的 sock_total。我知道我需要使用 dplyr::summaries()，但我很难理解该函数中的内容。

Answer 1

如果您要比较 1991 年和 1990 年，您可以:

socks %>% 
    group_by(drawer_nbr) %>% 
    summarise(growth = +(sock_total[year == 1991] - sock_total[year == 1990] > 0))
# A tibble: 3 x 2
#  drawer_nbr growth
#       <int>  <int>
#1          1      0
#2          2      1
#3          3      0