白色背景添加到plot.xts()图例[R]

问题描述 投票:3回答:1

我期待通过绘制plot.xts()几个时间系列,内置的包在R. XTS对象

目前,我使用了以下内容:

## 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

r plot xts
1个回答
1
投票

您可以使用

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"

© www.soinside.com 2019 - 2024. All rights reserved.