Sep 7, 2018 · 1 min read
I think you already cracked this one. Just add the unquoted filter conditions to the function call.
filter_by <- function (df, …) {
filter_conditions <- rlang::quos(…)
dplyr::filter(df, !!!filter_conditions)
}
test <- filter_by(mtcars, cyl == 6, disp > 150, vs == 1)