检查R中是否存在按ID分组的值

Question

我想通过以下标准定义变量new_var：

对于每个id，如果存在reference = 1，则new_var = 1;否则new_var = 0，例如：

id      reference 
A            0   
A            1     
B            0   
B            0  

创建new_var，表格如下：

id      reference     new_var
A            0          1
A            1          1
B            0          0
B            0          0

我只知道我可以在SAS中使用case when语句，但在R中如何执行此操作？

Answer 1

以下是base R选项transform

transform(df1, new_var = as.integer(id %in% id[reference>0]))
#   id reference new_var
#1  A         0       1
#2  A         1       1
#3  B         0       0
#4  B         0       0