这是一个有点积聚对我以前的帖子创建缺失值(所有我运行该脚本可以在那里找到)的堆积面积/条形图。 在这篇文章中,然而,林问,如果可能离开在连续x轴的差距? 我有一个时间系列(一个月按一个月)一年多了,但对于一个样本一个月份失踪,我想这个月显示为情节完整的差距。 几乎像与九月的缝隙绘制了1 - 8月为十月至十二月的图形(SEP是丢失的)和一个和合并这些
我想到了尝试的治疗缺少的每月零或NA的唯一的东西,创造了九月面积图表中的休下降或排除,但与x轴范围从1-11个,分别为(见的Dropbox文件夹图) 。
该数据集进出口工作可以在我找到的Dropbox文件夹和它的命名r_class.txt,你还可以看到两个不同的地块(Rplots1和2)。
任何想法真的可以理解!
绘制系列作为两个单独的数据帧:
#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