对齐多个xts时间序列绘图

3
我有一个包含4列的xts对象。前3列是比例的均值、下限和上限置信区间,第4列是样本大小。由于比例尺不同,我想将前三列绘制在一个图表上,并将第四列绘制在另一个图表中,位于其下方。你有什么建议吗?
这里是创建类似我所拥有的xts对象的代码:
startTime = Sys.time()
n = 10
d = seq(startTime,startTime+n*24*60*60,by="1 day")
a = sample(10000,length(d),replace=TRUE)
p = runif(length(d))
l = p/2
u = p+(p+1)/2
x= xts(p,d)
x = cbind(x,l,u,a)
colnames(x) = c("prop","low","high","size")
1个回答

10

如果你使用plot.zoo,那么这个任务就非常容易完成。以下代码可以帮助你入门:

library(xts)
data(sample_matrix)
x <- as.xts(sample_matrix)
plot.zoo(x, screens=c(1,1,1,2))

?plot.zoo中有大量的示例;确保查看它们。


如何为每个绘图添加图例? - Arun Raja

网页内容由stack overflow 提供, 点击上面的
可以查看英文原文,
原文链接