How to make a function param a column name in dplyr

unquote_in_function.R

library(dplyr)

df <- tibble(
  apple = 1:3,
  banana = c("x", "foo", "z"),
  cherry = 4:6
)

test_cc <- function(x, col) {
  filter(x, {{ col }} == "foo")
}

test_base <- function(.data, name) {
  filter(.data, .data[[name]] == "foo")
}

test_sym <- function(.data, col) {
  col <- ensym(col)
  filter(.data, !!col == "foo")
}

df |> test_cc(banana)
df |> test_base("banana")
df |> test_sym(banana)