逐渐露出ioslides的barplot酒吧

Question

我正在尝试在Rstudio ioslides演示文稿中逐渐展示或构建我的情节中的条形图。 在显示下一张幻灯片中的完整情节之前，如何在一张幻灯片中隐藏第3和第4条时显示下图？我必须在两张幻灯片中保留所有文本和条形间距。

我觉得这种技术在演示文稿中很有用，但是目前只能在powerpoint / keynote中通过在我想要隐藏的栏上放置一个白框来实现这一点。

library(tidyverse)

mtcars %>% 
  mutate(
    am = factor(am, labels = c("auto", "manual")),
    vs = factor(vs, labels = c("V", "S"))
  ) %>% 
  ggplot(aes(x = am, y = mpg, fill = vs)) + 
  geom_col(position = position_dodge()) +
  theme(
    panel.grid.minor = element_blank(),
    panel.grid.major = element_blank(),
    panel.background = element_blank(), 
    panel.border = element_blank(),
    axis.line = element_line(colour = "black")
  )

Answer 1

试试第一张幻灯片。它删除了手动传输的数据，但留下了列的空间（scale_x_discrete）。然后为第二张幻灯片做你的原创，但留在scale_y_continuous（我添加到两者中，以便在两张幻灯片中保留所需的高度）。

mtcars %>% 
  mutate(
    am = factor(am, labels = c("auto", "manual")),
    vs = factor(vs, labels = c("V", "S"))
  ) %>% filter(am == "auto") %>%
  ggplot(aes(x = am, y = mpg, fill = vs)) + 
  geom_col(position = position_dodge()) +
  scale_x_discrete(drop=FALSE) +
  scale_y_continuous(limits = c(0,35)) + 
  theme(
    panel.grid.minor = element_blank(),
    panel.grid.major = element_blank(),
    panel.background = element_blank(), 
    panel.border = element_blank(),
    axis.line = element_line(colour = "black")
  )