在ggplot中，为什么我的标签没有在正确的位置苍白？

Question

这是我的数据

    mydf <- structure(list(NOME = c(1, 1, 1, 1, 1), PLAYER.POSITION = c("Lateral", 
"Lateral", "Lateral", "Lateral", "Lateral"), variables_bar = structure(5:1, .Label = c("ACCELERATIONS.Z6", 
"ACCELERATIONS.Z5", "ACCELERATIONS.Z4", "ACCELERATIONS.Z3", "ACCELERATIONS"
), class = "factor"), value = c(185L, 111L, 49L, 22L, 3L)), row.names = c(NA, 
-5L), class = c("tbl_df", "tbl", "data.frame"))

这是我的阴谋：

mydf %>% ggplot() + geom_col(aes(x = NOME, y = value, fill = variables_bar)) + geom_label(aes(x = NOME, y = value,label = value))

标签应该在每个条子的顶部，但它不是。

有什么帮助吗？

Answer 1

有一种方法我们可以这样做：

library(tidyverse)

mydf %>% ggplot() + 
  geom_col(aes(x = NOME, y = value, fill = variables_bar)) + 
  geom_label(aes(x = NOME, y = value, label = value),size=5,
             position=position_stack(vjust=0.5))

​

​