如何将颜色匹配的图例添加到R Matplot

满月

我使用matplot在图形上绘制了几条线:

matplot(cumsum(as.data.frame(daily.pnl)),type="l")

这给我每行的默认颜色-很好,

但是我现在想添加一个反映相同颜色的图例-我该如何实现?

请注意-我尝试不首先指定要绘制的颜色。

legend(0,0,legend=spot.names,lty=1)

给我所有相同的颜色。

研究

matplot的默认颜色参数是data.frame列的nbr列上的序列。因此,您可以像这样添加图例:

nn <- ncol(daily.pnl)
legend("top", colnames(daily.pnl),col=seq_len(nn),cex=0.8,fill=seq_len(nn))

cars数据集为例,此处提供添加图例的完整代码。最好用layout漂亮的方式添加图例。

daily.pnl <- cars
nn <- ncol(daily.pnl)
layout(matrix(c(1,2),nrow=1), width=c(4,1)) 
par(mar=c(5,4,4,0)) #No margin on the right side
matplot(cumsum(as.data.frame(daily.pnl)),type="l")
par(mar=c(5,0,4,2)) #No margin on the left side
plot(c(0,1),type="n", axes=F, xlab="", ylab="")
legend("center", colnames(daily.pnl),col=seq_len(nn),cex=0.8,fill=seq_len(nn))

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章