1

我有两个不同时间长度的时间序列(ts 变量)。这是年度数据,它们存储为单独的 ts.objects。第一个系列开始于 1936 年,另一个系列开始于 1943 年,结束于 2012 年。问题:我找不到用于将这些系列绘制成一个包含所有观察结果的单一、漂亮的图形的 R 脚本(命令)。如果有人可以提供帮助,那就太好了。

问候

4

1 回答 1

4

如果数据具有可比性,那么您只需将 x 轴限制设置为整个数据的范围,例如

set.seed(2) ## reproducible
dat1 <- data.frame(Year = seq(1936, 2012, by = 1), Y = runif(77))
dat2 <- data.frame(Year = seq(1943, 2012, by = 1), Y = runif(70))

ylim <- range(dat1$Y, dat2$Y)
xlim <- range(dat1$Year, dat2$Year)

plot(Y ~ Year, data = dat1, type = "l", col = "red", xlim = xlim,
     ylim = ylim)
lines(Y ~ Year, data = dat2, type = "l", col = "blue")

我会让你美化剧情。

刚刚注意到你说ts的变量,所以下面也可以

ts1 <- ts(runif(77), start = 1936, freq = 1)
ts2 <- ts(runif(70), start = 1943, freq = 1)

xlim <- c(1936, 2012)
ylim <- range(ts1, ts2)    

plot(ts1, ylim = ylim, xlim = xlim, col = "red")
lines(ts2, col = "blue")

使用您的数据,替换runif(n)为两个时间序列的真实数据。

于 2013-07-04T12:56:51.270 回答