Добавить белый фон для plot.xts () Legend [R] - PullRequest
0 голосов
/ 04 февраля 2019

Я хочу построить несколько временных рядов с помощью plot.xts (), встроенного пакета для объектов xts в R.

В настоящее время я использую следующее:

## Create xts dataset
ust <- merge.xts(us.3m, 
                 us.6m,
                 us.2y,
                 us.3y,
                 us.5y,
                 us.10y,
                 us.30y)
## Create color scheme using rainbow()
tsRainbow = rainbow(ncol(as.zoo(ust)))

## Create plot of dataset
plot.xts(ust, screens=1,
             major.ticks="years",
             main="U.S. Bond Yield Evolution",
             yaxis.right=FALSE,
             grid.ticks.on="years",
             col=tsRainbow)
## Add legend
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")

Это дает следующий график:

Evolution of Bond Yields

Я хотел бы добавить белый наложенный фон к легенде , чтобылинии сетки не могут быть видны в области легенды.Это сделает область графика намного чище и позволит увидеть метки легенды в похожем на публикацию документе.

Редактировать

Решение, предоставленное @JuliusVainora, работало хорошо.Простое решение моей проблемы.

Updated image

1 Ответ

0 голосов
/ 04 февраля 2019

Вы можете использовать

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")

, где bty="o" дает полную коробку с белым фоном.Если вы хотите, чтобы цвет границы также был белым, добавьте box.col="white".

...