#盒式图boxplot
library(reshape2)
library(ggplot2)
data1=read.csv('Documents.csv',header = T)
data1=melt(data1) #长数据变成宽数据
head(data1)
ggplot(data=data1)+
geom_boxplot(mapping=aes(x=data1$variable,y=data1$value,fill=data1$variable))+theme_bw()+
scale_y_continuous(breaks = seq(0, 6, by = 2))
data1=melt(data)
tail(data1)
网友评论