火山图
library(ggplot2)
4. 画图
r03 = ggplot(data,aes(log2FC,-1*log10(FDR))) （先是纵坐标）
r03 + geom_point()
R软件-ggplot2 <wbr>画火山图
4.1 改变点的颜色
r03 + geom_point(color ="red")
r03 +geom_point(aes(color ="red"))
r03 + geom_point(aes(color =significant))
R软件-ggplot2 <wbr>画火山图R软件-ggplot2 <wbr>画火山图
4.2 设置坐标轴范围和标题 # xlim()，ylim()函数，labs(title=“..”,x=“..”,y=“..”)函数
r03xy = r03 +geom_point(aes(color =significant)) + xlim(-4,4) + ylim(0,30)
r03xy + labs(title="Volcanoplot",x="log2(FC)")
r03xy + labs(title="Volcanoplot",x=expression_r(log[2](FC)), y=expression_r(-log[10](FDR)))
R软件-ggplot2 <wbr>画火山图
4.3 自定义颜色
r03xyp = r03xy + labs(title="Volcanoplot",x=expression_r(log[2](FC)), y=expression_r(-log[10](FDR)))
r03xyp + scale_color_manual(values =c("green","black", "red"))
volcano = r03xyp +scale_color_manual(values = c("#00ba38","#619cff","#f8766d"))
R软件-ggplot2 <wbr>画火山图
4.4 添加阈值线
volcano+geom_hline(yintercept=1.3)+geom_vline(xintercept=c(-1,1))
volcano+geom_hline(yintercept=1.3,linetype=4)+geom_vline(xintercept=c(-1,1),linetype=4)
R软件-ggplot2 <wbr>画火山图
5.保存图片
ggsave("volcano.png")
ggsave("volcano8.png",volcano,width=8,height=8)
Volcano plot
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着，像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上，一...
- 文/苍兰香墨 我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
推荐阅读更多精彩内容
- From shirinsplayground，非常好的机器学习的文章，保存下来，慢慢学习。 https://shi...
