[ R시각화] 바로 가져다 쓰는 범례(legend)

1. 범례를 색으로 구분

 

x <- seq(-pi, pi, len = 100)
plot(x, sin(x), type = "l", ylim = c(-pi, pi), col = 1)
lines(x, cos(x), col = 2)
lines(x, tan(x), col = 3)

legend("topright",legend=c("sin", "cos", "tan"), fill=c(1,2,3))

 

2. 범례를 선스타일로 구분

 

x <- seq(-pi, pi, len = 100)
plot(x, sin(x), type = "l", ylim = c(-pi, pi), col = 1,lty=1)
lines(x, cos(x), col = 2,lty=2)
lines(x, tan(x), col = 3,lty=4)

legend("topright",legend=c("sin", "cos", "tan"), col=c(1,2,3),lty=c(1,2,4))