>

이 그래프를 복제하고 싶습니다 (그룹 간 패싯 포함) (완료된 패싯) 여기에 이미지 설명 입력 이것은 나의 시도이다 :

library (ggplot2)
data<- data.frame(
  d = rep(LETTERS[21:26], 10),
  val = rnorm (60),
  c = rep(LETTERS[1:10], each = 6)
)
ggplot(data, aes(c, val)) + 
 geom_bar(stat = 'identity', aes(fill = val), position = "dodge") +
 facet_grid(data[, 1] ~ .)

와 그래프는 회피 된 위치 대신에 수직으로 배열된다. 어떻게해야합니까?

고맙습니다.

  • 답변 # 1

    facet_grid() 가 필요 없다고 생각합니다 그냥 'd' 에 의해 작성 .

    ggplot(data, aes(c, val)) +
      geom_bar(stat = 'identity', aes(fill = d), position = "dodge")
    
    

    <시간>

    OP의 의견에 따라 facet_grid(cols = vars(d)) 를 사용할 수도 있습니다 .

    ggplot(data, aes(c, val)) + 
      geom_bar(stat = 'identity', aes(fill = val), position = "dodge") +
      facet_grid(cols = vars(d)) # or facet_grid(. ~ d)
    
    

관련 자료

  • 이전 python - TensorFlow에서 출력 예측을 얻는 방법
  • 다음 java - 날짜 값의 JavaFX DatePicker 세트 정렬