R 如何在同一x轴上绘制具有不同开始日期的时间序列

假设我有两个数据集，一个在x轴上有50天，另一个有20天，用代码创建

par(mfrow=c(2,1))
data1=rnorm(50)
plot(data1,type='l',xlab='Days')
data2=rnorm(20)
plot(data2,type='l',xlim=c(0,50),xlab='Days')

实际上，数据集2中的第1天对应于数据集1中的第20天，因此我想绘制数据集2，使x轴（如上所述）从0到50，但数据从x=20到x=40绘制。我猜答案很简单，但我在网上找不到

---

谢谢。

将

x

和

y

参数传递到绘图

plot(20:39,data2,type='l',xlim=c(0,50),xlab='Days')

虽然如果要使用相同的轴打印多个数据集，最好使用ggplot2或lattice。你的情节会好看得多

all_data <- data.frame(
  day = c(1:50, 20:39),
  y   = c(runif(50), rnorm(20)),
  grp = factor(rep(1:2, times = c(50, 20)))  
)

#ggplot2 style
library(ggplot2)
ggplot(all_data, aes(day, y)) +
  geom_line() +
  facet_grid(grp ~ .)

#lattice style
library(lattice)
xyplot(y ~ day | grp, all_data, type = "l", layout = c(1, 2))

---

所有_数据都更准确，可以说您的默认绘图看起来会更好