plot.xts () Формат метки для оси x и Метка для оси y [R] - PullRequest
0 голосов
/ 04 февраля 2019

Задать дополнительный вопрос о 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")

Current graph

Я хотел бы выполнить следующее:

  1. Добавить y- осевая метка, называемая "Bond Yield (%)"
  2. Сделать метки для оси X в формате год.Вместо того, чтобы видеть "Jan 01 1997", я хотел бы видеть "1997" под помеченными галочками.

Я попытался выполнить задачу 1, используя традиционный аргумент ylab в вызове plot.xts().Я попытался выполнить вторую задачу, используя аргумент major.format в вызове plot.xts().Очевидно, что ни один из этих обходных путей не был успешным.

Я полагаю, что, вероятно, существует простое решение этой проблемы.Однако я не очень разбираюсь в составлении xts наборов данных и буду признателен за помощь.

...