在R中添加简单图例到绘图

Question

我想创建一个非常简单的情节.我正在使用这些数据:

a <- read.table("https://dl.dropbox.com/u/22681355/a.csv", sep=',', header=TRUE)

plot(a$X25, type="l",col="red", ylim=c(0,100))
lines(a$X25.1, type="l", col="blue")
lines(a$X25.2, type="l", col="green")
lines(a$X25.3, type="l", col="brown")

现在我想添加一个简单的图例,指示哪个颜色是哪个变量.

我知道我可以使用该legend()命令,但我的问题是我不知道如何在图例中的文本旁边放置颜色.

这样做最简单的命令是什么？

Answer 1

看看?legend并尝试这个:

legend('topright', names(a)[-1] , 
   lty=1, col=c('red', 'blue', 'green',' brown'), bty='n', cex=.75)