在 plot.zoo 中旋转 y 轴文本标签

Question

我想将 y-labs 的标签旋转到水平，没有 ggplot 找不到答案。

有没有办法在 plot.zoo 中旋转它们？

我指的标签是那些称为系列 1:5 的标签，我用红色勾勒出它们。

data <- xts(matrix(rnorm(1000), ncol = 5), order.by = as.Date(1:200))
plot.zoo(data)

Answer 1

像这样使用las=1：

plot.zoo(data, las = 1)

更新

后来澄清问题是指ylab。 plot.zoo 为此使用多行文字并对其进行硬编码；然而，我们可以使用 trace:

破解它

library(xts)

trace(plot.zoo, 
  quote(mtext <- function(...) graphics::mtext(..., cex = 0.7, las = 1)))
plot.zoo(data, oma = c(6, 5, 5, 0))
untrace(plot.zoo)

在 plot.zoo 中旋转 y 轴文本标签

Rotate y axis TEXT labels in plot.zoo

plot

r

zoo

更新