像这样使用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)