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

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

我正在处理的代码如下:

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()"做错.

有谁能够帮我？

有了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)