R - 将系列添加到多个图中

Question

我有以下情节：

plot.ts(returns)

我有另一个数据框ma_sd，其中包含来自上述回报的移动平均线的滚动标准差。 df的结构与returns完全相同。有没有一种简单的方法可以将每一行添加到相应的图中？

lines(1:N, ma_sd)似乎很直观，但不起作用。

由于

Answer 1

我能看到你这样做的唯一方法是分别绘制它们。这段代码有点笨拙，但可以让您充分灵活地指定标签和轴范围。你可以在此基础上继续发展。

par(mfrow=c(3,1),oma=c(5,4,4,2),mar=c(0,0,0,0))
time<-as.data.frame(matrix(c(1:length(returns[,1])),length(returns[,1]),3))
plot(time[,1],returns[,1],type='l',xaxt='n')
points(time[,1],ma_sd[,1],type='l',col='red')
plot(time[,2],returns[,2],type='l',xaxt='n')
points(time[,2],ma_sd[,2],type='l',col='red')
plot(time[,3],returns[,3],type='l')
points(time[,3],ma_sd[,3],type='l',col='red')