R语言-ggplot2的语法汇总（持续更新中）

每次画图时都要去百度很麻烦，所以干脆把常用的语句总结一下，持续更新中，敬请关注～

输出高清图
library(Cairo)
CairoJPEG("crosstalk.jpeg",width=7200,height=4800,res=1200)
排列X轴顺序
scale_x_discrete(limits=test$Symbol)
背景为白色
theme_bw()
去掉网格线
theme(panel.grid = element_blank())
去掉X轴坐标
theme(axis.text.x=element_blank())
去掉X轴刻度尺
theme(axis.ticks.x = element_blank())
去掉X轴标题
theme(axis.title.x = element_blank())
在图上加基因名字
geom_text_repel(aes(x=test$Symbol,y=test$log2FoldChange.C2.C1.,label=ifelse(test$X=="intersect",test$Symbol,"")),
                  colour="darkred",size=3,box.padding = unit(0.35, "lines"),point.padding = unit(0.3, "lines"))
加上外面的黑圈
temp<-test[which(test$X=="intersect"),]
geom_point(data=temp,aes(x=temp$Symbol,y=temp$log2FoldChange),alpha=1,size=5.1,shape=1,stroke=1,color="black")
去掉外边框
theme(panel.border = element_blank())
加上坐标轴
theme(axis.line = element_line(colour = "black"))
加上水平虚线
geom_hline(aes(yintercept = 0),linetype="dashed")
坐标轴翻转
coord_flip()
分面展示
facet_wrap(~pthway,nrow=2)
不要图例标题
theme(legend.title=element_blank())
不要图例
theme(legend.position = "none")
图例位置
theme(legend.position=c(1,1),legend.justification = c(1,1))
图例颜色
scale_fill_manual(values = c("#DF2020", "#DDDF21"))
坐标倾斜
theme(axis.text.x = element_text(angle = 40, hjust = .5, vjust = .5,size = 8))
手动设置颜色
scale_color_manual(values=mycol)
手动设置填充颜色
scale_fill_manual(values = c("#e6b4c9","#cfe6da"))
Y轴从0开始
scale_y_continuous(expand = expand_scale(mult = c(0,0.04)))
坐标轴线为黑线
axis.line = element_line(colour = "black")
 网格黑色区域去掉
theme_minimal()
堆积柱形图
geom_bar(stat = "count",width = 0.5,position = "fill")
调整坐标轴标题和坐标字大小
theme(axis.text.x = element_text(size=10),
        axis.text.y = element_text(size=10),
        axis.title.y = element_text(size=15),
        axis.title.x = element_text(size=15))
在柱形图上加上字
geom_text(stat = "count",aes(label=..count..),color="white",size=3.5,position=position_fill(0.5))
控制X轴或者Y轴的刻度
scale_y_continuous(breaks =seq(2,14,by=4))
添加趋势线
stat_smooth(method=lm)
添加密度线
stat_density(aes(x = c),position="identity",geom="line",color="red")