ggplot2分面柱状图柱子比例一致_你需要堆叠柱状图添加bar吗?

年底了,各种事情都在排队去做,造成的后果就是时间像流水一下迅速过去了,抽出一点时间做点学习成了奢求,前两天在微生信生物群0中讨论了一个如何对堆叠柱状图添加误差线问题,类似下面的图片:额。画质真烂!我使用R语言简单实现了一下,这里希望能为大家做个借鉴。

dd92ed212d4b375a9693475c40dc344c.png

其实这个实现很简单,就像我们对堆叠柱状图添加标签一样,只不过这里添加的是bar。这里核心步骤只有两条第一是构造误差线的坐标,我们使用函数:ddply(df_res,"Attribute",transform,label_y = cumsum(Mean ));第二个是重新排布堆叠柱状图不同分组因子水平,保证按照正确的方向填充:factor(df_res$Species,levels = c("virginica","versicolor","setosa"  ))。这两条做好之后我们就可以出图了。

## 导入包library(ggplot2)library(reshape2)library(RColorBrewer)library(plyr)## 载入数据,这里是默认的鸢尾花数据df #数据宽边长df "Species", variable.name=#设置出图颜色mycol= brewer.pal(n = 12, na
  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值