r - 绘制两个时间序列 : axis issue

Question

我试图在同一个 x 轴(但不同的 y 轴)上绘制两个时间序列。但是我遇到了 y 轴标签重叠的问题。

生成问题的代码如下。

set.seed(123)
library(zoo) 
plot(as.zoo(cbind(rnorm(1000,.1,50),runif(1000,0,100))))

您应该会看到第一个绘图的最低 y 刻度值与第二个绘图的最高 y 刻度值重叠。你会如何解决这个问题？

Answer 1

使用 las=1、cex.axis=.7 和一些 ylim 修改怎么样？有关 las 和 cex.axis 功能的详细说明，请参阅 ?par

set.seed(123)
library(zoo) 
plot(as.zoo(cbind(rnorm(1000,.1,50),runif(1000,0,100))), 
 cex.axis=.7, las=1, ylim=list(c(-160,160), c(0,100)))

产生:

另一种解决方案是使用 yax.flip=1

set.seed(123)
library(zoo) 
plot(as.zoo(cbind(rnorm(1000,.1,50),runif(1000,0,100))),  yax.flip=1)