R中的递归变量

Question

我正在开发一个数据库，该数据库包含有关个人身份(Id(、Date、Group_id的信息

data = data.frame(Id = 1:6, 
Date = as.Date(c("2010-12-28", "2011-01-28", "2011-01-30", "2009-09-01", "2009-09-05", "2012-12-20")), 
Group_id = c(1,1,2,3,3,3))

现在我想创建一个新的伪CCD_ 4变量，如果存在来自相同CCD_。我想要的输出是这样的：

Id      Date      Group_id  Recurrent
1      2010-12-28    1          0
2      2011-01-28    1          1
3      2011-01-30    2          0
4      2009-09-01    3          0
5      2009-09-05    3          1
6      2012-12-20    3          1

但我对如何表演感到困惑。有人能告诉我怎么做吗？

问候！

Answer 1

• 试试这个

library(dplyr)
data |> mutate(Recurrent = as.numeric(duplicated(Group_id)))

• 输出

Id       Date Group_id Recurrent
1  1 2010-12-28        1         0
2  2 2011-01-28        1         1
3  3 2011-01-30        2         0
4  4 2009-09-01        3         0
5  5 2009-09-05        3         1
6  6 2012-12-20        3         1