在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)