ggplot2 сохранить гистограмму неиспользуемых уровней

Я хочу отобразить неиспользуемые уровни (то есть уровни, на которых счетчик равен 0) в моем bar-plot, однако неиспользуемые уровни отбрасываются, и я не могу понять, как их сохранить

df <- data.frame(type=c("A", "A", "A", "B", "B"), group=rep("group1", 5))
df$type <- factor(df$type, levels=c("A","B", "C"))

ggplot(df, aes(x=group, fill=type)) + geom_bar()

В приведенном выше примере я хочу, чтобы C отображался с отсчетом 0, но он полностью отсутствует...

Спасибо за любую помощь Ульрик

Изменить:

Это делает то, что я хочу

df <- data.frame(type=c("A", "A", "A", "B", "B"), group=rep("group1", 5))
df1 <- data.frame(type=c("A", "A", "A", "B", "B", "A", "A", "C", "B", "B"), group=c(rep("group1", 5),rep("group2", 5)))

df$type <- factor(df$type, levels=c("A","B", "C"))
df1$type <- factor(df1$type, levels=c("A","B", "C"))
df <- data.frame(table(df))

df1 <- data.frame(table(df1))

ggplot(df, aes(x=group, y=Freq, fill=type)) + geom_bar(position="dodge")
ggplot(df1, aes(x=group, y=Freq, fill=type)) + geom_bar(position="dodge")

Думаю, решение состоит в том, чтобы вычислить частоты, используя table(), а затем построить