小编han*_*ck1的帖子

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

我的代码

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 轴上也有“1”的空格，那么在视觉上更容易解释。

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

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