## violin plot violin plot和boxplot功能類似，但是violin plot將點的密度橫向的展示出來了，因此可以很好的看出數據在坐標軸分布的情況。 > 數據繼續使用上一節的數據rt_box_m ``` ### 類似于boxplot，使用的geom_violin來生成violin plot PV1 <- ggplot(rt_box_m, aes(x = gene_name, y = expression)) + geom_violin(trim = FALSE, aes(color = group)) + scale_color_manual(values = c("blue", "red")) #改變violin顏色 print(PV1) ### 感覺這樣有點難看 ### 我們可以把boxplot也加入進去，可能好看點 svg(file = 'box_plot17.svg', width = 8, height = 4) PV2 <- ggplot(rt_box_m, aes(x = gene_name, y = expression)) + geom_violin(trim = FALSE, aes(color = group)) + geom_boxplot(width = 0.1, aes(color = group), position = position_dodge(0.9)) + #加入box scale_color_manual(values = c("blue", "red")) print(PV2) ### 也可以將box變成點 PV3 <- ggplot(rt_box_m, aes(x = gene_name, y = expression)) + geom_violin(trim = FALSE, aes(color = group)) + geom_dotplot(aes(fill = group, color = group), trim = FALSE, binaxis='y', stackdir='center', dotsize = 0.2, position = position_dodge(0.9)) #加入點 print(PV3) ```