ggplot : geom_text가 geom_col 위에 인쇄되지 않음

debugcn 에 게시 Dev

cmirian

막대 위에 텍스트 항목을 자동으로 인쇄하는 방법에 대한 수많은 스레드를 보았습니다. 그러나 이것이 작동하지 않는 이유를 알 수 없습니다.

나는 가지고있다

와

p %>% 
  as_tibble() %>% 
  mutate(nystudie=as.character(nystudie),
         n.stage=as.factor(n.stage)) %>% 
  bind_rows(., mutate(., nystudie="all")) %>% 
  count(nystudie, n.stage)

같이

# A tibble: 13 x 3
   nystudie n.stage     n
   <chr>    <fct>   <int>
 1 A        0           4
 2 A        2           4
 3 A        3           1
 4 all      0          22

내가 좋아하는 것 n, 각 위의 텍스트로 인쇄 할 n.stage당 nystudie.

그래서 이것은 막대 그래프를 제공합니다

  ggplot(aes(nystudie, n, color = n.stage, fill= n.stage, label=n)) +
  geom_col(position = position_dodge2(preserve = "single", padding = 0.1))

하지만 추가

+ geom_text(vjust=0)

오류가 발생합니다.

매핑은 aes ()로 만들어야합니다.

그 이유는 무엇이며 어떻게 geom_text인쇄 할 수 aes(label=n)있습니까?

p <- structure(list(nystudie = c("B", "B", "B", "B", "B", "B", "B", 
"B", "B", "B", "B", "B", "A", "A", "B", "B", "B", "B", "B", "B", 
"B", "B", "A", "B", "B", "A", "B", "A", "A", "A", "B", "B", "B", 
"B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", "B", 
"B", "B", "B", "B"), n.stage = structure(c(3L, 5L, 1L, 1L, 1L, 
1L, 5L, 4L, 3L, 2L, 3L, 4L, 1L, 3L, 3L, 1L, 3L, 1L, 2L, 2L, 1L, 
4L, 2L, 1L, 2L, 4L, 1L, 1L, 2L, 1L, 1L, 1L, 2L, 4L, 1L, 2L, 1L, 
4L, 4L, 1L, 1L, 5L, 1L, 1L, 2L, 4L, 1L, 4L, 1L, 2L), .Label = c("0", 
"1", "2", "3", "4"), class = "factor")), row.names = c(NA, -50L
), class = "data.frame")

오리

아마도 당신은 이것을 찾고 있습니다 :

library(tidyverse)
#Data and plot
p %>% 
  as_tibble() %>% 
  mutate(nystudie=as.character(nystudie),
         n.stage=as.factor(n.stage)) %>% 
  bind_rows(., mutate(., nystudie="all")) %>% 
  count(nystudie, n.stage) %>%
  ggplot(aes(nystudie, n, color = n.stage, fill= n.stage, label=n)) +
  geom_col(position = position_dodge2(preserve = "single", padding = 0.1))+
  geom_text(aes(label=n),position = position_dodge2(0.9),vjust=-0.5)

산출:

이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.

침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제

에서 수정2021-04-5

몇 마디 만하겠습니다

0리뷰

로그인참여 후 검토

Related 관련 기사

기사

ggplot : geom_text가 geom_col 위에 인쇄되지 않음

ggplot : geom_text가 geom_col 위에 인쇄되지 않음

ggplot : geom_text가 geom_col () 위에 중앙 정렬되지 않습니다.

ggplot2 레이블은 geom_col 막대로 피하지 않습니다.

ggplot에서 서로 가까운 값을 가진 geom_col ()

ggplot : 위치 지정을위한 그룹 인수가있는 geom_text

geom_col에 ylim 추가

Ggplot2 : geom_text ()는 플롯에 원하지 않는 값을 추가합니다.

회피 된 barplot에 geom_text 추가가 작동하지 않음

ggplot2 : geom_text () 함수로 레이블이 표시되지 않음

겹침을 피하기 위해 ggplot2에서 geom_col의 테두리에 색을 지정하는 방법은 무엇입니까?

ggplot : 여러 플롯에 레이블을 추가하는 방법 (geom_text 사용, 범례 없음)?

값이 0 인 geom_col에 추가 스테이플 추가 R

ggplot에서 geom_text () 배치 정렬

누적 된 geom_col 플롯의 최대 값에 geom_point 추가-변수 결과로 색상 지정

ggplot / plotnine-특정 색상으로 geom_text ()에서 범례 추가

ggplot2 facet_grid : geom_col에서 열 사이의 다른 간격을 수정하는 방법

여백이있는 facet_grid가있는 geom_col = TRUE가 쌓이지 않습니까?

R에서 geom_col ()에 줄을 추가하는 방법

geom_col은 모든 데이터 포인트를 플롯하지 않습니다.

geom_text 및 패싯이 작동하지 않음

Shiny + ggplot2-plotOutput-zoom-부동 geom_text 위치

geom_col은 값이 정수로 반올림 될 때 stat_identify를 사용하지 않습니다.

R의 음수 값 geom_col ()이 0 미만으로 이동

ggplot2에서 geom_text를 사용하는 텍스트 색상이 범례와 일치하지 않습니다.

geom_point의 크기에 상대적인 위치로 geom_text 또는 geom_label을 추가하는 방법은 무엇입니까?

ggplot에서 geom_text ()를 사용하여 그리스 문자로 방정식 추가

ggplot2 : geom_col을 다른 열의 값으로 채우기

shiny를 사용할 때 geom_col ()의 ggplot2 상호 작용에서 인수로 사용할 확인란 그룹의 선택한 입력 값을 전달하는 방법은 무엇입니까?

geom_text가있는 ggplot2 coord_flip ()

geom_col에서 막대의 가변 너비를 가질 수 있습니까?