pasar argumentos de función a dplyr y ggplot

Estoy confundido acerca de cómo pasar el argumento de la función a los códigos dplyr y ggplot. Estoy usando la versión más reciente de dplyr y ggplot2. Aquí está mi código para producir un diagrama de barras (claridad vs precio medio)

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:

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

Para la versión más reciente de dplyr, los verbos subrayados_ () están en desuso. Parece que deberíamos usar quosures.

Mis preguntas:

¿Alguien puede aclarar la mejor práctica actual para esto?

¿Qué estaba mal con el código anterior? (sin subrayar verbos dplyr por favor ..)

En ggplot, sé que podemos usar aes_string (), pero en mi caso, solo uno de los parámetros en aes se pasa del argumento de función.

Gracias por adelantado.

Respuestas a la pregunta(5)

Su respuesta a la pregunta