Мы можем использовать reduce
с |
, чтобы проверить, есть ли какие-либо ИСТИННЫЕ элементы в каждой строке
library(dplyr)
library(purrr)
df1 %>%
mutate(isAnyType = reduce(., `|`))
Или использовать rowSums
в base R
df1$isAnyType <- rowSums(df1) > 0
Или другой вариант pmap
df1 %>%
mutate(isAnyType = pmap_lgl(., ~ any(c(...)))
data
df1 <- structure(list(typ1 = c(TRUE, FALSE, TRUE), typ2 = c(TRUE, FALSE,
FALSE), typ3 = c(FALSE, FALSE, FALSE)), class = "data.frame",
row.names = c(NA,
-3L))