утался в том, как передать аргумент функции в коды dplyr и ggplot. Я использую новейшие версии dplyr и ggplot2. Вот мой код для создания барплота (ясность против средней цены)

diamond.plot<- function (data, group, metric) {
    group<- quo(group)
    metric<- quo(metric)
    data() %>% group_by(!! group) %>%
           summarise(price=mean(!! metric)) %>% 
           ggplot(aes(x=!! group,y=price))+
           geom_bar(stat='identity') 
}

diamond.plot(diamonds, group='clarity', metric='price')

ошибка:

Error in UseMethod("group_by_") : no applicable method for 'group_by_' applied to an object of class "packageIQR"

Для новейшей версии dplyr подчеркнутый verbs_ () мягко не рекомендуется. Похоже, мы должны использовать вопросы.

мои вопросы:

Может кто-нибудь уточнить текущую лучшую практику для этого?

что не так с приведенным выше кодом? (не подчеркивайте глаголы dplyr, пожалуйста ..)

Я знаю, что в ggplot мы можем использовать aes_string (), но в моем случае только один из параметров в aes передается из аргумента функции.

Заранее спасибо.