R 막대그래프 barplot(), ggplot()

일단 가장 기본적인 막대그래프는 barplot() 함수로 그릴 수 있다. 예제는 gcookbook 패키지를 쓴다.

 

> library(gcookbook)
> BOD
  Time demand
1    1    8.3
2    2   10.3
3    3   19.0
4    4   16.0
5    5   15.6
6    7   19.8
> barplot(BOD$demand)

 

아래 그림과 같은 결과가 화면에 뜬다.

가로축에 라벨을 붙이고 싶으면

> barplot(BOD$demand,names.arg=BOD$Time)

Time=6에 해당하는 그래프가 없는 것이 좀 찜찜하다면 ggplot2 패키지에 ggplot() 함수를 쓰면 된다.

> library(ggplot2)
> ggplot(BOD,aes(x=Time,y=demand))+geom_bar(stat="identity")

 

ggplot()으로 6 없이 가는 방법도 있다. Time 변수를 factor()로 처리해 주면 된다.

 

> ggplot(BOD,aes(x=factor(Time),y=demand))+geom_bar(stat="identity")

 

 

참고문헌: 윈스턴 챙 지음, 이제원 옮김, <R Graphics Cookbook> O'Reilly, 인사이트