1

这是在我之前的帖子的基础上创建一个带有缺失值的堆叠区域/条形图（我运行的所有脚本都可以在那里找到）。然而，在这篇文章中，我问是否有可能在连续的 x 轴上留下一个间隙？我有一个超过一年的时间序列（逐月），但是对于一个样本，缺少一个月，我想将这个月显示为情节中的一个完整间隙。几乎就像为一月至八月（缺少九月）和十月至十二月绘制一个图表，并将它们与九月的差距合并。

我想出的唯一尝试是将缺失的月份视为零或 NA，在 9 月的面积图中创建一个巨大的下降或排除它，但 x 轴的范围分别为 1-11（请参见保管箱文件夹中的图） .

我正在处理的数据集可以在我的dropbox 文件夹中找到，它被命名为 r_class.txt，您还可以看到两个不同的图（Rplots1 和 2）。

任何想法都会非常感激！

4

1 回答 1

0

将系列绘制为两个单独的数据框：

#Load libraries
require(ggplot2)
require(reshape)

#Code copied from your linked post:
wa=read.table('wa_class.txt', sep="", header=F, na.string="0")
names(wa)=c("Class","Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
wam=melt(wa)
wam$variablen=as.numeric(wam$variable)

#For readability, split the melted data frame into two separate data frames
wam1 <- wam[wam$variablen %in% 1:6,]
wam2 <- wam[wam$variablen %in% 8:12, ]

ggplot() +
  geom_area(data=wam1, aes(x=variablen, y=value, fill=Class)) +
  geom_area(data=wam2, aes(x=variablen, y=value, fill=Class))
  #and add lineranges, etc., accordingly
于 2012-10-13T03:05:26.403 回答