label 겹치는 문제 해결

기존 코드에 scale_x_discrete(guide = guide_axis(n.dodge = 2))를 추가 해주어 label의 겹침을 해결 할 수 있다.

# Use guide_axis to dodge the labels
p + 
  scale_x_discrete(guide = guide_axis(n.dodge = 2))

겹치는 label 제거

또는 scale_x_discrete(guide = guide_axis(check.overlap = TRUE)) 코드를 사용하여 겹치는 부분을 제거 할 수 있다.

# Or to remove overlapping labels
p + 
  scale_x_discrete(guide = guide_axis(check.overlap = TRUE))

연속형 데이터에 이산형 크기로 구분 짓기 가능

scale_size_binned()를 사용하면서 연속형데이터인 hwy에 대해 단계적으로 구분을 지어 크기로 표현을 할 수가 있다.

p + 
  scale_size_binned()

연속형 데이터에 이산형 컬러로 구분 짓기 가능

scale_colour_binned()를 사용하면서 연속형으로 표현하는 hwy (파란색 label)을 구분 지어줄 수 있다.

p + 
  scale_colour_binned()

scale_size_binned

이산형 binning 처리에 항상 애매한 문제가 되는 경계값도 legend에 표기가능!

p + 
  scale_size_binned(guide = guide_bins(show.limits = TRUE))

연속형 데이터를 x축 방향으로 정렬시킴

scale_x_binned()는 x축방향으로 정렬시켜 막대플롯을 연상시키듯 사용할 수가 있다.

p + 
  scale_x_binned()

ggplot(mpg) + 
  geom_bar(aes(displ)) + 
  scale_x_binned()

default로 y만 선택이 가능하다

ggplot의 특성상 default에 x가 들어가야 했던것이 y로 지정해주어 가로에서부터 표현을 할 수 있게 해주었다. (그러나 음… 막상 이기능은 직관적이지 못하다는 인상을 줄 수 있을것 같다. 늘 그렇듯이 dafault는 x라는 생각을 하기 때문인가 보다.)

ggplot(mpg) + 
  geom_bar(aes(y = manufacturer))

geom_smooth 역시 y관점에서 설정이 가능하다

글로벌하게 적용되는 aes 가 아닌 geom_* 함수의 orientation 아규먼트를 통해 개별 geom 단위로 처리하는 것도 가능

ggplot(mpg, aes(displ, hwy)) + 
  geom_point() + 
  geom_smooth(orientation = "y")

## `geom_smooth()` using method = 'loess' and formula = 'y ~ x'

내부를 색으로 채우는 코드

after_scale()코드를 사용하여 내부를 색으로 표현이 가능하다.

ggplot(mpg, aes(class, hwy)) +
  geom_boxplot(aes(colour = class, fill = after_scale(alpha(colour, 0.4))))

하나의 aes 에 여러개의 mapping을 하는 것도 이제 가능함

stage() 기능을 사용.

ggplot(mpg) + 
  geom_bar(
    aes(
      x = drv, 
      colour = stage(start = drv, after_scale = alpha(colour, 0.5))
    ), 
    fill = NA, size = 4
  )

## Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
## ℹ Please use `linewidth` instead.

Step 1.

윤곽을 계산하는데 있어 보다 선명한 표현을 할 수 있게 되었다. 다음 그림을 보자. 등고선을 표현하려고 하는데 직관적이지도 뚜렷하지도 않다.

volcano_long <- data.frame(
  x = as.vector(col(volcano)),
  y = as.vector(row(volcano)),
  z = as.vector(volcano)
)

ggplot(volcano_long, aes(x, y, z = z)) + 
  geom_polygon(aes(fill = stat(level)), alpha = 0.5, stat = "contour") + 
  guides(fill = "legend")

## Warning: `stat(level)` was deprecated in ggplot2 3.4.0.
## ℹ Please use `after_stat(level)` instead.

Step 2.

geom_contour_filled() 함수를 사용하여 조금 더 선명한 표현을 할 수 있었다.

ggplot(volcano_long, aes(x, y, z = z)) + 
  geom_contour_filled(aes(fill = stat(level)), alpha = 0.5)

Step 3.

이번에 이 모든 문제가 해결되었다. 위 그림과 다른점은 범례를 표현하는데, 연속적인 표현을 이산화 해서 표현을 하였다.

ggplot(volcano_long, aes(x, y, z = z)) + 
  geom_contour_filled(aes(fill = stat(level))) + 
  guides(fill = guide_colorsteps(barheight = unit(10, "cm")))