我想创建一个新变量，其中“Yes”表示5列中的任何一列为“Yes”，“No”表示未选择任何列
我可以将它们相加以计算出每组中应该有多少，但我不确定如何创建新变量

data$pyes <- sum(data$pocket_biopsy== "Yes" | data$pxray == "Yes" | 
      data$pxray == "Yes" |
      data$pchemo == "Yes" | 
      data$pconsult == "Yes", na.rm=TRUE)

data$pno <-sum(data$pbiopsy== "No" & data$pxray == "No" & 
      data$pxray == "No" &
      data$pchemo == "No" & 
      data$pconsult == "No", na.rm=TRUE)