Я хотел бы создать очень простой сюжет. Я использую эти данные:
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()
, но моя проблема в том, что я не знаю, как поместить цвета рядом с текстом в легенде.
Какая самая простая команда, которая сделает это?