ggplot2分面柱状图柱子比例一致_肿么办，ggplot2不能截断纵坐标

 今天是生信星球陪你的第596天

---

   大神一句话，菜鸟跑半年。我不是大神，但我可以缩短你走弯路的半年~

   就像歌儿唱的那样，如果你不知道该往哪儿走，就留在这学点生信好不好~

   这里有豆豆和花花的学习历程，从新手到进阶，生信路上有你有我！

需求

昨晚讲到绘图，学员提出需求绘制类似这样的图，引起了我的兴趣：

第一组的纵坐标与其他组相差较大，需要截断。

R语言实现

数据和原图

df <- data.frame(a = c(1,2,3,500), b = c('a1', 'a2','a3', 'a4'))library(ggplot2)ggplot(df) + aes(x = b, y = a,fill = b) +geom_col() +theme_bw()+coord_flip()

方法1：plotrix

搜索结果指向这个包。一看它并不是ggplot体系的，但确实可以实现截断的需求。横纵都可，也能画截断式的箱线图。如果需要多分组，也能实现，在：https://stackoverflow.com/questions/24202245/grouped-barplot-with-cut-y-axis

library(plotrix)
gap.barp