40

非常に単純なプロットを作成したいと思います。私はこのデータを使用しています:

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()いますが、凡例のテキストの横に色を付ける方法がわからないという問題があります。

これを行う最も簡単なコマンドは何ですか?

4

1 に答える 1

63

これを見て?legend、試してみてください:

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

ここに画像の説明を入力

于 2013-02-14T20:21:25.517 に答える