绘制箱线图,可使用ggplot2中的geom_boxplot函数,以carData包中的Salaries数据框为例
library(ggplot2)
library(carData)
p<-ggplot(data=Salaries,aes(x=rank,y=salary,fill=sex))+geom_boxplot()
p
以上为最简单的boxplot绘图方式,而我们有时候需要对横纵坐标及标题内容进行修改,可设置以下参数:
p+ scale_x_discrete(breaks=c("AsstProf","AssocProf","Prof"),#设置横坐标组别
labels=c("Assistant\nProfessor","Associate\nProfessor","Full\nProfessor"))+#设置横坐标标签
scale_y_continuous(breaks=c(50000,100000,150000,200000),#设置y轴标签
labels = c("$50k","$100k","$150k","$200k"))+#设置Y轴坐标标签
labs(title="Faculty Salary by Rank and Sex", x="",y="")#设置标题
可以看到 ,横纵坐标的标签修改,如果想用自己的一套主题时,可将一系列参数封装在theme主题中,方便绘图时调用,以该例子为例
mytheme<-theme(plot.title=element_text(face="bold.italic",size="14",color="brown"),
axis.title = element_text(face="bold.italic",size=10,color="brown"),
axis.text = element_text(face="bold",size=9,color="darkblue"),
panel.background = element_rect(fill="white",color="darkblue"),
panel.grid.major.y =element_line(color="grey",linetype = 1),
panel.grid.minor.y = element_line(color="grey",linetype = 2),
panel.grid.minor.x = element_blank(),legend.position="top" )
p + mytheme