ggplot 색상 설정-1

김승욱님 강의를 듣고 작성하였습니다.

[R을 R려줘] R 시각화 기초 - 인프런

 

막대 그래프

데이터 준비

> bar_df = data.frame(obs = 1:10, +                     var = rep(c('A', 'B', 'C'), length.out = 10), +                     value = sample(1:100, size=10), +                     stringsAsFactors = FALSE) > head(bar_df)   obs var value 1   1   A    10 2   2   B    40 3   3   C    11 4   4   A    87 5   5   B    52 6   6   C     2

 

그래프1

> ggplot(data = bar_df, aes(x = obs, +                           y = value))+ +   geom_bar(stat = 'identity')

geom_col()로 해도 된다.

 

그래프2

> ggplot(data = bar_df, aes(x = obs, +                           y = value, +                           color = value))+ +   geom_bar(stat = 'identity')

geom_col(size=2)하면 경계선 색상이 두꺼워진다.

 

그래프3

> ggplot(data = bar_df, aes(x = obs, +                           y = value, +                           fill = value))+ +   geom_bar(stat = 'identity')

fill은 2차원 속성의 면에 색상을 입힘

 

그래프4 

> ggplot(data=bar_df, aes(x = obs, +                         y = value, +                         fill = as.factor(value)))+ +   geom_bar(stat = 'identity')

x축 값을 기준으로 일일히 색을 입힘(막대그래프는 연속적이지 않으므로 이게 나을 수 있다.)

축에 있는 글자를 키우려면 + theme(axis.text = element_text(size = 20))

 

그래프5

> ggplot(data=bar_df, aes(x = as.factor(obs), +                         y = value, +                         fill = as.factor(value)))+ +   geom_bar(stat = 'identity')

x 축 값을 일일히 지정해줌

 

그래프6

> ggplot(data = bar_df, aes(x = var, +                           y = value, +                           fill = as.factor(value)))+ +   geom_bar(stat = 'identity', position = 'stack')

A, B, C그룹에 해당하는 것이 여러개 있으니 중첩해서 그릴 수 있다.

 

그래프7

ggplot(data = bar_df, aes(x = var,                           y = value,                           fill = as.factor(value)))+   geom_bar(stat = 'identity', position = 'dodge')

쌓이지 않게 피해서 모아서 그려라.