在R中将多个竞争列合并为一列

我有11列，每列代表不同的种族。参与者可以为每一列选择“是”或“否”。我不知道如何将所有这些列合并到一个种族变量中，其中“是”和“否”响应转换为特定种族，如果参与者选择了多个种族，则将其编码为“多个种族”

任何意见都将不胜感激

库（tidyverse）
df欢迎来到SO。请阅读并申请您的qestion：
library(tidyverse)

df <- data.frame(q105_1 = c('', '', 'White', ''), 
                 q105_2 = c('Black', '', 'Black', ''))


twoOrMoreRaces <- df %>% 
  mutate(twoOrMoreMinority = case_when(
    q105_1 == 'White' & q105_2 == 'Black'~ 'Two or More races',
    TRUE ~ 'Single Race Reported'
  ))