含有中文的图输出为pdf会有乱码的解决：

#首先输入该函数
> pdf("C:/Users/RNG/Desktop/1.pdf",family = "GB1")#（储存路径，fanily为字体，设置为GB1就可以避免中午乱码）
#绘图
> ggplot(df,aes(x=Element,y=`concentration(mg/L)`,fill=`TEMP（℃）`))+geom_bar(stat = "identity",position = position_dodge())+facet_grid(cols = vars(df$MR))+theme(panel.background = element_rect(fill='white',colour = 'black'),axis.title.x=element_text(colour = 'black',size=20),axis.title.y = element_text(colour = 'black',size=20),legend.text = element_text(size = 15))
#结束语
> dev.off()

改变标签文字为纵向

q+theme(axis.text.x= element_text(angle = 90, hjust = 0))#q为绘图函数，x为需要改变的坐标轴，angle为旋转角度，hjust为是否水平对齐