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

Question

我想创建一个非常简单的情节。 我正在使用this data：

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)