ggplot 색상 설정-3

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

RStudio Cloud

 

선 그래프

데이터 준비

color_df = data.frame( obs = 1:10,                        var = rep(c('A', 'B', 'C'), length.out=10),                        value = sample(1:100, size=10),                        stringsAsFactors = F) head(color_df)

 

그래프1

ggplot(data = color_df,        aes(x = obs,            y = value)) +   geom_line(size = 2)

 

그래프2

ggplot(data = color_df,        aes(x = obs,            y = value,            color = value)) +   geom_line(size = 2)

 

그래프 3

ggplot(data = color_df,        aes(x = obs,            y = value,            color = 'blue')) +   geom_line(size = 2)

색상 적용이 안되네?

 

그래프 4

ggplot(data = color_df,        aes(x = obs,            y = value),            color = 'blue') +   geom_line(size = 2)

역시나 색상 적용이 안되네?

 

그래프 5

ggplot(data = color_df,        aes(x = obs,            y = value)) +   geom_line(size = 2,             color = 'blue')

이제 되네 하하하

 

그래프 6

ggplot(data = color_df,        aes(x = obs,            y = value)) +   geom_line(size = 2,             color = 'blue',             alpha = 0.3)

 

선 그래프 - 생상 함수 활용

그래프 1

ggplot(data = color_df,        aes(x = obs,            y = value,            group = var,            color = var)) +   geom_line(size = 2) +   scale_color_grey(start = 0.2,                    end = 0.8)

그래프 색상을 회색계열로 입혀주었다. 시작값 0.2~ 끝값 0.8. 흰색:1, 검정색:0

 

그래프 2

ggplot(data = color_df,        aes(x = obs,            y = value,            group = var,            color = var)) +   geom_line(size = 2) +   scale_color_brewer(palette = 1)

지정된 팔레트를 가져와서 팔레트를 기준으로 색상을 칠하겠다. 1번은 파란색 계열

 

그래프3

ggplot(data = color_df,        aes(x = obs,            y = value,            group = var,            color = var)) +   geom_line(size = 2) +   scale_color_brewer(palette = 2)

 

그래프4

ggplot(data = color_df,        aes(x = obs,            y = value,            group = var,            color = var)) +   geom_line(size = 2) +   scale_color_brewer(palette = 3)

팔레트로 해도 좋지만 보고서를 쓰게 되면, 보고서를 받는 사람이 원하는 색상이나 내가 속한 조직이 사용하는 색상이 있다. 

 

그래프 5

ggplot(data = color_df,        aes(x = obs,            y = value,            group = var,            color = var)) +   geom_line(size = 2) +   scale_color_manual(values = c('A'='red', 'B'='blue', 'C'='green'))