使用动物园中的as.yearmon在ggplot2中修改Plot

Question

我在ggplot2中使用zoo创建了一个图表来创建月份箱.但是,我希望能够修改图形,使其看起来像标准的ggplot图形.这意味着将丢弃未使用的容器以及填充整个容器空间的容器.这是我的代码:

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))

ggplot调用是:

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

我不确定我错过了什么,但我想知道!提前致谢!

Answer 1

要获得"标准外观"图,请将数据转换为"标准"数据类型,这是一个因素:

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