Wrap ggplot2 function

I am recently wrapping some ggplot2 functions in my package easybio but encountered a problem; According to the documentation and my knowledge of eval_tidy, we should do it like this to wrap a function with quoted arguments in a tidy-like function:

f1 <- function(data, x, y, color) {
  ggplot(data, aes({{x}}, {{y}}, {{color}})) +
  geom_point()
}

This works well. However, when I want to add additional aesthetic arguments ... to the f1 function, it doesn’t seem to work. Instead of wrapping ... in {{}}, no special operations need to be performed as if the ... argument is a common argument:

f1 <-  function(data, x, y, color, ...) {
  ggplot(data, aes({{x}, {{y}, {{color}}, ...)) +
  geom_point()
}

Finally, I found this documentation in rlang package referring to this-Passing ... is equivalent to the combination of enquos() and !!!:

my_group_by <- function(.data, ...) {
  .data %>% dplyr::group_by(...)
}
my_group_by <- function(.data, ...) {
  .data %>% dplyr::group_by(!!!enquos(...))
}