Add a new column to a tibble and use case_when() with multiple types of replacement values in RHS

Question

My repex toy data:

(df <- tibble(
  symp_A = c("Yes", NA, NA, "Yes", "No", NA), 
  symp_B = c("Yes", NA, NA, "