ggplot2如何画分组堆积图

zzzzzq

如题

zzzzzq

比如横坐标是A、B、C，A有两根柱，都是堆积的柱，分别代表库存和销售情况

medo

zzzzzq
是要下面这种堆积的柱么?

library(reshape2)
library(ggplot2)


dt = data.frame(
  id      =  c("A","B","C"),
  `库存`   =  c(1,2,3),
  `销售`   =  c( 3,4,5),
  stringsAsFactors = FALSE
)

mlt_dt = melt (dt,id = "id")

ggplot( mlt_dt ,aes(x=id , y=value,fill=variable)) +
  geom_bar( stat="identity" )+
  theme(text = element_text(family = "STXihei"))

zzzzzq

medo 是这种的升级版，就是A上有两根你画的这种柱子

F-test

这样的吗？

在medo 代码基础上做了一些修改。

library(reshape2)
library(ggplot2)


dt = data.frame(
  id      =  c("A","B","C"),
  `月初销售`   =  c( 3,4,5),
  `月初库存`   =  c(4,5,6),
  `月末销售`   =  c( 3,3,3),
  `月末库存`   =  c(1,2,3),
  stringsAsFactors = FALSE
)

mlt_dt = melt (dt,id = "id")

p <- rep(c("L","R"),each=nrow(mlt_dt)/2)  # 位置参数

mlt_dt$p <- p;

ggplot( mlt_dt ,aes(x=p , y=value,fill=variable)) +
  geom_bar(stat="identity")+
  facet_grid(cols = vars(id))+  # 分面
  xlab("id")+
  theme(text = element_text(family = "STXihei"),
        axis.text.x =element_blank(),
        axis.ticks.x = element_blank())  # 去除x轴标签+刻度线

zpmu

查看position = position_jitter()