使用帶有 dplyr 和 ggplot2 的管道

%>%運算子也可用於將 dplyr 輸出傳遞到 ggplot。這建立了一個易於定製的統一探索性資料分析（EDA）管道。這種方法比在 ggplot 內部進行聚合更快，並且具有避免不必要的中間變數的額外好處。

library(dplyr)
library(ggplot)

diamonds %>% 
    filter(depth > 60) %>% 
    group_by(cut) %>% 
    summarize(mean_price = mean(price)) %>% 
    ggplot(aes(x = cut, y = mean_price)) + 
        geom_bar(stat = "identity")