R-使用向量作为函数的默认arglist

Question

我想使用向量作为函数的默认选择。在我的真实函数中，我有更多唯一的值，我想动态地将它们作为默认选择传递。下面的示例工作正常，但我希望将class_list$class中的值显示在黄色注释框和roxygen文档中。

这可能吗？

library(tidyverse)

class_list <- 
  mpg %>% 
  distinct(class)

avg_hwy <- function(set_class = class_list$class){
  mpg %>% 
    filter(class %in% set_class) %>% 
    summarise(mean = mean(cty))
}



avg_hwy()
avg_hwy("compact")
avg_hwy("suv")