r - dplyr 同时过滤多列上的多个数字

Question

我有一个这样的数据集:

PatientNum<- c(1, 2, 3, 4, 5)
Age<- c(10, 21, 51, 42, 35) 
SurgicalProcedureNumber <- c(21356, 21424, 221356, 12345, 54321) 
OtherSurgicalProcedureNumber   <- c(54321, 21356, 12345, 12345, 21424) 
BloodLoss<-c(5,4,5,10,5)
YetAnotherSurgicalProcedureNumber<-c(11111,22222,33333,21356,555555)

dataset <- data.frame(PatientNum, Age, SurgicalProcedureNumber, OtherSurgicalProcedureNumber, BloodLoss,YetAnotherSurgicalProcedureNumber)  

我想知道患者什么时候接受了某些手术:

NumbersIcareAbout<- c(21356,21424)

我知道在我可以做的一栏中找到它们:

dataset%>%filter(SurgicalProcedureNumber%in%NumbersIcareAbout)

这将返回患者 1 和 2，因为它具有这些代码......但我希望它在这些数字出现在 SurgicalProcedureNumber、OtherSurgicalProcedureNumber 或 YetAnotherSurgicalProcedureNumber 中时返回该行

不知道如何，也无法在这里找到它。

Answer 1

在 dplyr 1.0.4 版本，我们可以使用 filter与 if_any

library(dplyr)
dataset %>%
      filter(if_any(ends_with("ProcedureNumber"), ~ . %in% NumbersIcareAbout))