mtcars 데이터 세트와 같은 데이터가 있다고 가정 해 보겠습니다 (제 경우에는 cyl 변수가 요소입니다).
library(tidyverse)
Data<-mtcars
다음과 같은 그래프를 작성하고 싶다고 가정 해 보겠습니다.
Data%>%ggplot(aes(x=as.factor(cyl),y=mpg))+geom_boxplot()
하지만 단순히 시각적 효과를 위해 x 축을 이렇게 늘리고 싶다고 가정 해 보겠습니다. 그리고 내 ms 페인트 기술을 용서하십시오. 그리드 선이 전체 방향으로 늘어난 하나의 연속 그래프가 될 것입니다.
어떻게 생각하세요? 패싯이 그렇다고 가정하는 것처럼 그래프를 나누고 싶지 않습니다.
인수를 숫자 위치로 변환하면 상대적으로 쉽게 x 축이 불연속적인 것처럼 보이게 할 수 있습니다.
library(tidyverse)
pos <- c(1, 5, 6)
mtcars %>%
mutate(cyl2 = pos[as.numeric(as.factor(cyl))]) %>%
ggplot(aes(x = cyl2, y=mpg)) +
geom_boxplot(aes(group = as.factor(cyl))) +
scale_x_continuous(breaks = pos,
labels = levels(as.factor(mtcars$cyl))) +
annotate("rect", xmin = 1.5, xmax = 4.5, ymin = -Inf, ymax = Inf,
fill = "white", colour = NA)
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다