r - ggplot多分组栏

Question

我想知道如何将 9 个分组条形图 (3x3) 组合在一起。

我的 CSV:

data <- read.csv("http://pastebin.com/raw.php?i=6pArn8GL", sep = ";")

这 9 个地 block 应根据“类型”A 到 I 进行分组。

然后每个分组条形图应在 y 轴上显示频率，x 轴按 1 pce 到 6 pce 分组并按年份分割。

我在 Excel 上有以下示例(参见图片)，并希望使用 ggplot 在 r 上创建相同的结果。可能吗？

Answer 1

首先，将数据从宽格式重新调整为长格式。

library(reshape2)
df.long<-melt(df,id.vars=c("ID","Type","Annee"))

接下来，由于在导入数据期间字母 X 被添加到以数字开头的变量名称中，因此使用 substring() 将其删除。

df.long$variable<-substring(df.long$variable,2)

现在使用variable作为x，value作为y，Annee作为填充，使用geom_bar()来获取条形图。使用facet_wrap()，您可以按类型分割数据。

ggplot(df.long,aes(variable,value,fill=as.factor(Annee)))+
   geom_bar(position="dodge",stat="identity")+
   facet_wrap(~Type,nrow=3)