打算使用之前的5組數(shù)據(jù)畫個(gè)箱線圖，每組的樣本個(gè)數(shù)不一樣，因此在畫圖的時(shí)候出現(xiàn)了組間順序混亂的結(jié)果。剛開始先載入包和讀取數(shù)據(jù)。

library(datasets)
library(ggplot2)
data=read.table("C:/Users/start/Desktop/data1.txt",header = T)

然后畫個(gè)最簡單的箱線圖

p0 <- ggplot(data,aes(x=group,y=methylation)) +
  geom_boxplot( )

簡單描述一下，就是五個(gè)組中按照時(shí)間順序本來應(yīng)該排在第一位的排在了最后一位
隨后去網(wǎng)上看了一下，發(fā)現(xiàn)可以用以下方式解決

data$group <- factor(data$group,levels = c("zygote", "2-cell", "4-cell", "8-cell", "morula"))

group就是箱線圖中的橫坐標(biāo)，這樣就可以按照自己設(shè)想的方式進(jìn)行排序了