Хранение фильтров для dplyr `filter ()` в переменной

Question

Я хочу отфильтровать несколько фреймов данных в одном наборе условий. Поэтому я бы хотел установить эти фильтры как переменные вне вызова filter().

Например

mtcars %>%
  filter(cyl > 4, disp > 100)

Я пытался сделать:

filters <- c(cyl > 4, disp > 100)
mtcars %>%
  filter(filters)

Но это не работает, потому что, когда я устанавливаю переменную filters, он ищет столбец данных.

> filters <- c(cyl > 4, disp > 100)
Error: object 'cyl' not found

Каков наилучший способ достичь этого?

Answer 1

Пакет rlang позволяет создавать неоцененные выражения, которые затем могут быть заменены специальными обозначениями !!. Если вы используете dplyr , у вас уже есть ключевые части rlang . Обратите внимание, что для filter рекомендуется четко указывать объединение нескольких условий, а не полагаться на неявное "anding" filter нескольких аргументов.

my.filter <- quo(cyl > 4 & disp > 100)

filter(mtcars, !!my.filter)

    mpg cyl  disp  hp drat    wt  qsec vs am gear carb
1  21.0   6 160.0 110 3.90 2.620 16.46  0  1    4    4
2  21.0   6 160.0 110 3.90 2.875 17.02  0  1    4    4
3  21.4   6 258.0 110 3.08 3.215 19.44  1  0    3    1
4  18.7   8 360.0 175 3.15 3.440 17.02  0  0    3    2
5  18.1   6 225.0 105 2.76 3.460 20.22  1  0    3    1
6  14.3   8 360.0 245 3.21 3.570 15.84  0  0    3    4
7  19.2   6 167.6 123 3.92 3.440 18.30  1  0    4    4
8  17.8   6 167.6 123 3.92 3.440 18.90  1  0    4    4
9  16.4   8 275.8 180 3.07 4.070 17.40  0  0    3    3

Как указал Артем, вы можете использовать запятую с множественной функцией quos и оператором !!!:

my.filter <- quos(cyl > 4, disp > 100)

filter(mtcars, !!!my.filter)