r - 在 R 中绘制堆积条形图

Question

我想在 R 中使用如下数据创建直方图 [堆积条形图]:

Period = c(1,1,2,2,3,3,4,4)                              
Sample = c("A","B","A","B","A","B","A","B")
Value1 = c(3,2,6,7,3,2,1,2)
Value2 = c(1,0,5,2,2,0,2,5)
x <- data.frame(Period,Sample,Value1,Value2)

X 轴上是否可以有“周期”和“样本”，以及“堆积条形图”中的值(“值 1”和“值 2”)。因此第一个直方图的高度将为 4(Value1 和 Value2 分开)提前谢谢你的帮助!谨致问候。

Answer 1

您描述的是堆积条形图，而不是直方图。使用 ggplot，您可以按如下方式进行操作:

library(ggplot2)
library(reshape2)

x <- data.frame(
  Period = c(1,1,2,2,3,3,4,4),
  Sample = c("A","B","A","B","A","B","A","B"),
  Value1 = c(3,2,6,7,3,2,1,2),
  Value2 = c(1,0,5,2,2,0,2,5)
)

mx <- melt(x, id.vars=1:2)
ggplot(mx, aes(x=Period, y=value, fill=variable)) + 
  geom_bar(stat="identity") + 
  facet_grid(~Sample)