如何使用ggplot2绘制左右分布的柱状图

#调用ggplot2包
library(ggplot2)
#读取数据，数据共两列
data1<-read.table('1.txt',sep='\t',header = T)
head(data1)

#增加一组分组，将logFC>0设置为A组，小于0设置为B组，当然这里也可以直接读取一个三列的数据
data1$group<-ifelse(data1$logFC>0,'A','B')
head(data1)

#初步绘图
ggplot(data1, aes(pathway, logFC, fill = group)) + geom_bar(stat = 'identity')

#修图
ggplot(data1, aes(pathway, logFC, fill = group)) + geom_bar(stat = ‘identity’) +coord_flip()+scale_fill_manual(values = c(‘A’=‘blue’, ‘B’=‘red’), guide = FALSE)+geom_text(data = subset(data1, logFC < 0),aes(x=pathway, y= 0, label= paste0(" “, pathway), color = group),size = 3,hjust = “inward” ) + geom_text(data = subset(data1, logFC > 0),aes(x=pathway, y= -0.1, label=pathway, color = group),size = 3, hjust = “outward”) + scale_colour_manual(values = c(‘A’=‘green’, ‘B’=‘pink’), guide = FALSE) +xlab(”") +ylab(“logFC”)+theme_bw() + #去除背景色
theme(panel.grid =element_blank()) + #去除网格线
theme(panel.border = element_rect(size = 0.6)) + #边框粗细
theme(axis.line.y = element_blank(), axis.ticks.y = element_blank(), axis.text.y = element_blank()) #去除y轴

#注释
#coord_flip()：旋转x轴和y轴
#scale_fill_manual(values = c(‘A’=‘blue’, ‘B’=‘red’), guide = FALSE):设置柱状填充的颜色
#geom_text(data = subset(data1, logFC < 0),aes(x=pathway, y= 0, label= paste0(" “, pathway), color = group),size = 3,hjust = “inward” ) + geom_text(data = subset(data1, logFC > 0),aes(x=pathway, y= -0.1, label=pathway, color = group),size = 3, hjust = “outward”) :文本的位置，大小的设置
scale_colour_manual(values = c(‘A’=‘green’, ‘B’=‘pink’), guide = FALSE)：设置文本的颜色
xlab(”") ：x轴标题去掉
+ylab(“logFC”)：设置y轴标题
theme_bw() ：去除背景色
theme(panel.grid =element_blank()) ：去除网格线
theme(panel.border = element_rect(size = 0.6)) ：边框粗细
theme(axis.line.y = element_blank(), axis.ticks.y = element_blank(), axis.text.y = element_blank()) #去除y轴

可以加qq交流 592680358

如何使用ggplot2绘制左右分布的柱状图相关推荐

R语言可视化包ggplot2绘制分组的条形图（bar plot、柱状图）实战：多变量柱状图
R语言可视化包ggplot2绘制分组的条形图(bar plot.柱状图)实战:多变量柱状图目录
R语言可视化：使用ggplot2绘制人口金字塔
人口金字塔是进行人口数据可视化时常用的一种统计图形,可以形象地描述人口年龄和性别的分布情况.最近工作上经常处理人口数据,于是试着使用ggplot2绘制了一下.在这里记录一下,顺便也熟悉一下ggplot ...
R语言ggplot2可视化：使用ggplot2绘制按时间顺序排列的时间线图（chronological timeline plot）
R语言ggplot2可视化:使用ggplot2绘制按时间顺序排列的时间线图(chronological timeline plot) 目录 R语言ggplot
R语言R原生及可视化包ggplot2绘制并排的箱图实战（Side-by-Side Boxplots）
R语言R原生及可视化包ggplot2绘制并排的箱图实战(Side-by-Side Boxplots) 目录 R语言R原生及可视化包ggplot2绘制并排的箱图实战(Side-by-Side Boxpl ...
R语言ggplot2可视化创建堆叠的柱状图（stacked barplot）并且每个堆叠的柱状图都缩放到总和为100%实战：最后所有的堆叠的柱子都一样高、Y轴以百分比的形式来显示
R语言ggplot2可视化创建堆叠的柱状图(stacked barplot)并且每个堆叠的柱状图都缩放到总和为100%实战:最后所有的堆叠的柱子都一样高.Y轴以百分比的形式来显示目录
R语言使用ggplot2绘制带有边缘直方图的散点图实战
R语言使用ggplot2绘制带有边缘直方图的散点图实战目录 R语言使用ggplot2绘制带有边缘直方图的散点图实战
R语言可视化包ggplot2绘制线性回归模型曲线实战（ Linear Regression Line）
R语言可视化包ggplot2绘制线性回归模型曲线实战( Linear Regression Line) 目录 R语言可视化包ggplot2绘制线性回归模型曲线实战( Linear Regression ...
R语言可视化包ggplot2绘制分组回归线实战（Regression Line by Group）
R语言可视化包ggplot2绘制分组回归线实战(Regression Line by Group) 目录 R语言可视化包ggplot2绘制分组回归线实战(Regression Line by Grou ...
R语言可视化包ggplot2绘制平滑曲线、回归线实战：geom_smooth() 函数
R语言可视化包ggplot2绘制平滑曲线.回归线实战:geom_smooth() 函数目录 R语言可视化包ggplot2绘制平滑曲线.回归线实战:geom_smooth() 函数

如何使用ggplot2绘制左右分布的柱状图

如何使用ggplot2绘制左右分布的柱状图相关推荐

最新文章

热门文章