여러 사이트 (패싯)에서 두 그룹 (x 변수)의 값 (y 변수)을 비교하는 플롯에서 작업 중입니다. ggplot을 사용하여 패싯 변수 (이 경우 사이트)를 기반으로 플롯을 패싯 처리하고 데이터를 표시 할 수 있었지만 해당 그룹의 중앙값을 나타내는 각 그룹에 선분을 추가하는 방법을 결정할 수 없었습니다. .
재현 가능한 예 :
library(tidyverse)
df <- diamonds %>%
filter(color == "D" | color == "E") %>%
filter(carat > 1)
p <- ggplot(data=df, aes(x = color, y=carat, fill=color)) +
geom_jitter(shape = 21, col="black") +
facet_wrap(~ cut, ncol = 5)
p
출력 :
출력하고 싶은 것은 다음과 같습니다 (실제로 중앙값에 그려지지 않은 선).
아마도 이것은 :
p + stat_summary(fun = "median", fun.min = "median", fun.max= "median", size= 0.3, geom = "crossbar")
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다