在 plot.zoo 中旋轉 y 軸 TEXT 標簽

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 為此使用 mtext 並對其進行硬編碼； 但是，我們可以使用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)