Modificando plot no ggplot2 usando as.yearmon do zoo

Eu criei um gráfico no ggplot2 usando o zoo para criar caixas do mês. No entanto, eu quero poder modificar o gráfico para que ele se pareça com um gráfico ggplot padrão. Isso significa que os compartimentos que não são usados são descartados e os que ocupam todo o espaço no compartimento. Aqui está o meu código:

library(data.table)
library(ggplot2)
library(scales)
library(zoo)

testset <- data.table(Date=as.Date(c("2013-07-02","2013-08-03","2013-09-04","2013-10-05","2013-11-06","2013-07-03","2013-08-04","2013-09-05","2013-10-06","2013-11-07")), 
           Action = c("A","B","C","D","E","B","A","B","C","A","B","E","E","C","A"), 
           rating = runif(30))

A chamada ggplot é:

ggplot(testset, aes(as.yearmon(Date), fill=Action)) + 
           geom_bar(position = "dodge") + 
           scale_x_yearmon()

Não tenho certeza do que estou perdendo, mas gostaria de descobrir! Desde já, obrigado!

questionAnswers(1)

yourAnswerToTheQuestion