r - 如何使用 ggplot2 在条形图 Axis 上为空因子水平创建占位符？

Question

我有一些调查数据，我想从中简单地绘制每个问题的每个响应的频率。

我的代码

library(ggplot2)

Df1 # data frame with 3 variables: Provider, Question, Score

Df1$Score <- factor(Df1$Score, levels = c(0,1,2,3))

# Plot
q <- qplot(Score, data = Df1, facets = .~Provider, geom="bar", fill=Provider)

q + labs(title = wrapper(Question, width = 70), x = "Score", y = "Frequency")   # Add title and axes labels

结果是这样的:

这很好，但由于我将生成其中一些图表，因此在 x Axis 上是否也有“1”的空间时，在视觉上更容易解释。

我花了很多时间尝试各种组合 scale_x_discrete、labels、breaks 和 reorder 但我'仍然无法生成难以捉摸的占位符。

有没有一种简单的方法可以强制 ggplot2 绘制一个空因子？

Answer 1

由于您没有提供完整的可重现示例:

ggplot(mtcars, 
            aes(factor(gear, levels = 1:5), 
                mpg)) +
  geom_point() + 
  scale_x_discrete(drop=F)

使用 drop=FALSE 保留未使用的因子水平。