我有一个 4 列的 xts 对象。前 3 列是一个比例的均值以及置信上限和下限。第 4 列是样本量。由于比例不同,我认为将前 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")
最佳答案
如果你使用 plot.zoo
很容易做到。这样的事情会让你开始:
library(xts)
data(sample_matrix)
x <- as.xts(sample_matrix)
plot.zoo(x, screens=c(1,1,1,2))
?plot.zoo
中有大量示例;请务必检查出来。
关于r - 对齐多个 xts 时间序列图,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/8345952/