情节奇怪的原因

时间:2012-06-29 02:04:40

标签: r plot time-series

我有深度与时间的关系曲线: 这个情节在5月初有一个奇怪的差距。

enter image description here

我检查了数据,但没有NAs或Nans或没有丢失数据。 这是15分钟的定期间隔的时间序列

我不能在这里提供数据集,因为它包含10,000行。 有人可以提出可能的建议吗?

我使用以下绘图代码:

   library(zoo)
   z=read.zoo("data.txt", header=TRUE)
   temp=index(z[,1])
   m=coredata(z[,1])
x=0.001
p=rep.int(x,length(temp))
png(filename=paste(Name[k],"_mean1.png", sep=''), width= 3500, height=1600, units="px")
par(mar=c(13,13,5,3),cex.axis= 2.5, cex.lab=3, cex.main=3.5, cex.sub=5)
plot(temp,m, xlab="Time", ylab="Depth",type='l', main=Name[k])
symbols(temp,m,add=TRUE,circles=p, inches=1/15, ann=F, bg="steelblue2", fg=NULL)
dev.off()

1 个答案:

答案 0 :(得分:7)

好的,这是对您发布的内容的猜测。

我猜测5月初就没有一段时间的数据会突然出现“差距”。没有NA,因为这个时期根本没有任何数据行。这行代码仍然在绘图中绘制了一条细黑线,它将数据中的“间隙”联系起来......

plot(temp,m, xlab="Time", ylab="Depth",type='l', main=Name[k])

...但是没有蓝色符号(圆圈)靠近在一起,使它看起来像一条连续的蓝线。使用以下代码绘制蓝色符号,位于现有绘图的顶部:

symbols(temp,m,add=TRUE,circles=p, inches=1/15, ann=F, bg="steelblue2", fg=NULL)

我建议不要绘制一条线,然后在它的顶部绘制符号,而只是绘制一条粗蓝线,如下所示:

plot(temp,m, xlab="Time", ylab="Depth",type='l', main=Name[k],lwd=5,col="steelblue2")