我想使用向量作为函数的默认选择。在我的实际功能中,我有更多独特的值,我想动态地将它们作为默认选择传递。下面的示例工作得很好,但我希望其中的值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")
