R语言 柱形图/条形图/分组条形图 绘图模板。

1.提前处理好因子（分组）变量，如计划作为x轴变量的排序，对分组变量因子化，并进行排序

ad_polt<-read.csv("绘图.csv",header = T)
ad_polt$分组<-factor(ad_polt$分组,levels = c("组1","组2","组3"))
ad_polt$x轴变量<-factor(ad_polt$x轴变量,levels = c("lev1","lev2"<"lev3",ed))
 

2.建立一个自己的图标主题，以后用到可以直接调出，修改利用，比较方便。

#####柱形图主题
mytheme1<-theme(plot.title = element_text(face="bold",size ="10",hjust = 0.5),
                axis.title=element_text(face = "bold",size = 9),
                axis.text.x  =element_text(face = "bold",size=7,color = "#040404",angle=30,hjust = 1,vjust =1),
                panel.background = element_rect(fill= "white"),
                panel.grid =element_blank(),                      #去除边框
                axis.line = element_