基于多列的值进行mutate

Question

是否有更简单的方法通过引用多列来创建二进制列呢？

 mutate(S.325=ifelse(PR1==325|PR2==325|PR3==325|PR4==325|
                        PR5==325|PR6==325|PR7==325|PR8==325|
                        PR9==325|PR10==325|PR11==325|PR12==325|PR13==325|
                        PR14==325|PR15==325,1,0))

Answer 1

我们可以使用rowSums

df1 %>% 
    mutate(S.325 = as.integer(rowSums(.[paste0("PR", 1:15)] == 325) >0))