R画累计条形图，每两个相邻，可以实现吗？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请教大家，R可以做出这样的图吗？（手工画的，有点丑。。。）




困难在每组的两个条形图距离近，组间距离远，而且横坐标有两行，不知道在R中怎么实现，还请大家指教，谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏2 回帖

关键词：条形图 横坐标 不知道 而且 手工

EXCEL画更简单些

1. > library(reshape2)
   
2. > library(ggplot2)
   
3. > foo=data.frame(f1=c('d1','d1','d2','d2','d3','d3'), f2=rep(c('G1','G2'),3), val1=runif(6,0,1),val2=runif(6,0,1),val3=runif(6,0,1))
   
4. > foo[,3:5]=foo[,3:5]/ rowSums( foo[,3:5]) #计算百分比
   
5. > bar=melt(foo)
   
6. Using f1, f2 as id variables
   
7. > ggplot(bar, aes(y=value, x=f2,fill=variable))+geom_bar(stat='identity')+ facet_wrap(~f1)
   
8. >

复制代码

沧溟公子 发表于 2016-5-31 11:01
EXCEL画更简单些

我用excel只做出了等间距的条形图，不知道两两相邻的怎么做，想着R的功能比较强大就来问一下

马甲1号 发表于 2016-5-31 13:19

谢谢，十分感谢分享代码！！比我想的还要好看，太厉害了！！