如何使用多列和参数“拆分”创建一个条形图

Question

我需要从包含17个数字列的data.frame为科学论文创建16 bar plots in one figure（构面或分屏），并使用参数split将按条分隔。我有一个大型data.frame 16种蒸发方法，月平均值。我尝试通过分面和分屏来做到这一点，但我不能。我已经附加了数据的图像。我希望找到解决方案。最好的问候

Answer 1

了解如何将数据从宽格式转换为长格式。然后你可以使用ggplot：

# create sample data
df <-  cbind(Month = 1:12, as.data.frame(replicate(16, runif(12))))

# reshape it from wide to long format
df <- reshape(df, idvar = 1, varying = list(-1), times = names(df)[-1], direction = "long", sep = "", timevar = "key", v.names = "value")

# Facetted bar plot
library(ggplot2)
ggplot(df, aes(x = Month, y = value)) + 
  geom_bar(stat = "identity") + 
  facet_wrap(~key)