R - 绘制 xts 和 zoo 对象时如何更改日期格式？

Question

我想知道如何更改日期格式。

我正在处理的代码如下：

library(quantmod)
getSymbols("AAPL")
price_AAPL <- AAPL[,6]
plot(price_AAPL, main = "The price of AAPL")

这个结果

我想更改

的日期格式

"%m %d %Y"

如图所示

"%b-%d-%Y"

所以我在搜索了一些提示后尝试了以下操作：

plot(price_AAPL, main = "The price of AAPL", xaxt="n")
axis.Date(1,
          at=seq(head(index(price_AAPL),1), 
                 tail(index(price_AAPL),1), length.out=5), 
          format="%b-%d-%Y", las=2)

但这没有帮助，甚至没有在 x 轴上显示任何标签。我想我可能对 "axis.Date()".

做错了什么

有人能帮帮我吗？

Answer 1

有了xts，可以直接用major.format。

plot(price_AAPL, main = "The price of AAPL",major.format="%b-%d-%Y")

但是，您应该知道 zoo 地块通常更灵活。

plot.zoo(price_AAPL, main = "The price of AAPL", xaxt="n", xlab="")
axis.Date(1,at=pretty(index(price_AAPL)),
            labels=format(pretty(index(price_AAPL)),format="%b-%d-%Y"),
            las=2, cex.axis=0.7)

R - 绘制 xts 和 zoo 对象时如何更改日期格式？

R - How can I change date format when I plot an xts & zoo object?

plot

r

xts

quantmod

as.date