plot.xts（）x轴刻度标签格式和y轴标签[R]

Question

询问有关plot.xts()格式的后续问题。几分钟前，我问了一个类似的问题，答案已经足够。代码和打印输出如下：

## Reformat UST time series
ust <- merge.xts(us.3m, us.6m, us.2y, us.3y, us.5y, us.10y, us.30y)

## Generate color schema for plot
asdf <- as.zoo(ust)
tsRainbow = rainbow(ncol(asdf))

## Plot bond yield evolution graph
plot.xts(ust, screens=1,
         major.ticks="years",
         main="U.S. Bond Yield Evolution", ylab="Bond Yield (%)",
         major.format="%Y",
         yaxis.right=FALSE, yaxis.left=TRUE,
         grid.ticks.on="years", col=tsRainbow)
## Add legend to graph using same color schema
addLegend("topright", 
          legend.names=c("US 3M", "US 6M", "US 2Y", "US 3Y", "US 5Y", "US 10Y", "US 30Y"),
          col=tsRainbow, 
          lty=c(1,1,1,1,1,1,1), lwd=c(2,2,2,2,2,2,2),
          ncol=2, bg="white", bty="o")

我想完成以下任务：

1. 添加称为"Bond Yield (%)"的y轴标签
2. 使x轴刻度标签具有仅一年的格式。我不想看到"Jan 01 1997"，而是希望看到标记的刻度线下方的"1997"。

我尝试在ylab调用中使用传统的plot.xts()参数来完成任务1。我试图在major.format调用中使用plot.xts()参数来完成第二项任务。显然，这些变通办法都没有成功。

我相信可能有一个解决此问题的简单方法。但是，我对绘制xts数据集并不精通，希望能提供一些帮助。