[英]Add White Background to plot.xts() Legend [R]
我想用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")
这将生成以下图表:
我想为图例添加白色叠加背景 ,以便在图例区域中看不到网格线。 这将使图形区域更清晰,并允许在类似于发布的文档中看到图例标签。
@JuliusVainora给出的解决方案效果很好。 简单解决我的问题。
你可以用
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"
。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.