R xts对象图分离轴

Question

示例：

library(xts)
data(sample_matrix)
matrix_xts <- as.xts(sample_matrix, dateFormat='Date')
matrix_xts[,1] = matrix_xts[,1] * 100
plot(matrix_xts)

如果我对此进行绘图，则很难将数据可视化。是否有可能以某种方式将第一列绘制在xts.plot中的辅助y轴上？

Answer 1

据我所知，xts绘图并不支持。 （也有些人不赞成在一个地块上使用2个不同的轴进行绘图，原因有多种，例如它可能会被误导。）

这是一个解决方法。在不同的图上绘制不同比例的列：

# Get latest version of xts for nice new plot tools (>= 0.10 not yet on CRAN)
library(devtools)
install_github("joshuaulrich/xts")
plot(matrix_xts[, 2:4])
lines(matrix_xts[,1], on = NA)

?plot.xts对于xts版本＆gt; = 0.10有一些有用的示例，用于与颜色等情节相关的选项。