Information Visualization (15) - R 그래픽 기초 (직선그래프 영역채우기)

> y  // y <- c(49.3, ....) 으로 y 값 입력

 [1] 49.3 51.9 50.8 49.6 49.3 50.6 48.4 50.7 50.9 50.6 51.5 52.8 51.8 51.1

[15] 49.8 50.2 50.4 51.6 51.8 50.9 48.8 51.7 51.0 50.6 51.7 51.5 52.1 51.3

[29] 51.0 54.0 51.4 52.7 53.1 54.6 52.0 52.0 50.9 52.6 50.2 52.6 51.6 51.9

[43] 50.5 50.9 51.7 51.4 51.7 50.8 51.9 51.8 51.9

> x=1920:1970

> plot.new() 

> plot.window(xlim=c(1920,1970), xaxs="i",ylim=c(46.5,55.5), yaxs="i") 

> abline(v=seq(1930,1960,by=10), col="gray") //배경 그리드 그리기

> abline(h=seq(48,54, by=2), col="gray")

> xx=c(1920,x,1970) 

> yy=c(46.5,y,46.5)

> polygon(xx,yy,col="gray") // 다각형 그리기

> axis(1)

> axis(2, las=1)

> box()

>