箱形圖，有時(shí)也稱為箱型圖，提供了連續(xù)變量分布的快照。它們特別擅長于比較數(shù)據(jù)集中各組的分布情況。箱形圖以一種簡化的格式顯示大量的信息。

尤其在比較不同組別間的數(shù)據(jù)分布時(shí)，箱形圖真正發(fā)揮了作用。其緊湊的設(shè)計(jì)提供了一個(gè)整潔的數(shù)據(jù)摘要，通過盒狀和須狀標(biāo)記的定位，可以輕松地比較各組的分布特性，應(yīng)用十分的廣泛。

下面我們將通過一個(gè)實(shí)操案例分別運(yùn)用R語言與風(fēng)暴統(tǒng)計(jì)網(wǎng)站為大家詳細(xì)介紹箱式圖的繪制方式，十分便捷快速。

數(shù)據(jù)集來源于R自帶MASS數(shù)據(jù)集birthwt，這是一份于1986年在在馬薩諸塞州收集的與嬰兒出生體重低相關(guān)的危險(xiǎn)因素的數(shù)據(jù)。本次復(fù)現(xiàn)涉及的變量說明如下。

1.安裝加載R包

install.packages("survival")install.packages("ggplot2")install.packages("ggpubr")library(survival)library(ggplot2)library(ggpubr)

2.導(dǎo)入數(shù)據(jù)

由于用到的是MASS中的數(shù)據(jù)集，因此也要先加載一下MASS包。

library(MASS)data(birthwt)

3.分類變量因子化

如果跳過這一步，可能導(dǎo)致繪圖失敗哦！

birthwt$race <- as.factor(birthwt$race)

4.繪制箱式圖

birthwt,"race","bwt"的位置分別對應(yīng)數(shù)據(jù)集，分類變量，定量變量。其他主要參數(shù)有fill指箱子的填充色，color選入分組變量，palette指定箱線圖的配色。method很重要！根據(jù)不同的數(shù)據(jù)類型，選擇不同的方法，比如兩組正態(tài)選用t.test，兩組偏態(tài)選用wilcox.test，兩組及以上偏態(tài)數(shù)據(jù)用kruskal.test，兩組及以上正態(tài)數(shù)據(jù)用anova.

Boxplot1<-  ggboxplot(birthwt,"race","bwt",                      add = " NULL",rug = TRUE,                      color = "race",fill = NULL,width = 0.4,                      palette = "npg", size = 0.4)Boxplot<- Boxplot1+stat_compare_means(method = "kruskal.test",label.x.npc = "center")Boxplot

接下來就得到了完整的箱式圖！

如果想要增加一些元素，比如繪制抖動(dòng)點(diǎn)式箱線圖，只需要將“add = " NULL"”修改為“add="jitter"”，其他不變，運(yùn)行后，就可以得到下面的圖啦！

 

是不是十分簡單呢，不需要修改代碼，只需要選擇相應(yīng)的參數(shù)，就秒出結(jié)果圖！

繪圖完畢后，支持下載PDF版與PNG版！下載參數(shù)可以自行設(shè)定，十分便利！