Я хочу построить несколько временных рядов с помощью 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")
Это дает следующий график:
Я хотел бы добавить белый наложенный фон к легенде , чтобылинии сетки не могут быть видны в области легенды.Это сделает область графика намного чище и позволит увидеть метки легенды в похожем на публикацию документе.
Редактировать
Решение, предоставленное @JuliusVainora, работало хорошо.Простое решение моей проблемы.