Этот код работает нормально.
vars_select(names(mtcars), starts_with("c"), starts_with("d"))
Если я хотел бы использовать вместо sapply:
pattern <- c("c", "d")
vars_select(names(mtcars), sapply(pattern, starts_with))
Я получаю ошибку Ошибка: match должен быть символьным вектором непустые строки.