r - 带有 theme_void r 的视图栏 / texte d'axe / étiquettes 标签

Question

我在 iris 数据库上做了一个图表，如下所示：

这是让我得到这个图表的代码：

    library(tidyverse)
iris %>%
  gather("Type", "Value",-Species) %>%
  ggplot(aes(Species, Value, fill = Type)) +
  geom_bar(position = "dodge", stat = "identity") +
  theme_bw()+
  scale_fill_brewer(palette="Paired")+
  theme_void()+
  theme(legend.position = "right",
        legend.title = element_blank(),
        legend.text = element_text(size = 13))

我用它theme_void来制作一个带有白色背景且没有线轴的图表。但它删除了三个物种（Verginica、Setosa...）的标签。

如何在每组条形图的底部显示标签。

R 提出的其他主题不适合我。

提前致谢

Answer 1

只需将此添加回主题！

library(tidyverse)
iris %>%
  gather("Type", "Value",-Species) %>%
  ggplot(aes(Species, Value, fill = Type)) +
  geom_bar(position = "dodge", stat = "identity") +
  theme_bw()+
  scale_fill_brewer(palette="Paired")+
  theme_void()+
  theme(legend.position = "right",
        legend.title = element_blank(),
        legend.text = element_text(size = 13), 
        axis.title.x = element_text(),
        axis.text.x = element_text())

^{由reprex 包（v1.0.0）于 2021-03-18 创建}