在ggplot中设置日期范围

Question

我的数据框是z：

> dput(z)
structure(list(Month = structure(c(14975, 15095, 15156, 15187, 
15248), class = "Date"), Value = c(1, 1, 1, 6, 1)), .Names = c("Month", 
"Value"), row.names = c(NA, 5L), class = "data.frame")


ggplot(z, aes(Month, Value)) + 
    geom_bar(fill="orange",size=.3,  stat="identity", position="identity") +
    geom_smooth(data=z,aes(Month,Value,group=1), method="lm", size=2, color="navyblue") + 
    scale_x_date(breaks = "1 month", labels=date_format("%b-%Y"))

这可行，但我真的很喜欢我的数据范围介于2011年1月1日至2013年1月1日之间。我的示例日期是2011年1月1日至2011年1月10日。是否有一种简单的方法可以在ggplot中强制从2011年1月1日到2013年1月1日的日期范围？

Answer 1

?scale_x_date处的文档提到它接受所有“典型”连续比例参数，包括limits：

library(scales)
ggplot(z, aes(Month, Value)) + 
    geom_bar(fill="orange",size=.3,  stat="identity", position="identity") + 
    geom_smooth(data=z,aes(Month,Value,group=1), method="lm", size=2, color="navyblue") + 
    scale_x_date(date_breaks = "1 month", 
                 labels=date_format("%b-%Y"),
                 limits = as.Date(c('2011-01-01','2013-01-01')))

Answer 2

SO用户注意到除了'ggplot2'之外还加载了scales包，这是礼貌的。有一个ggplot2::xlim函数，所以这有效：

  ...... + xlim(as.Date(c('1/1/2011', '1/1/2013'), format="%d/%m/%Y") )

更新：因为一个无法解释的原因而得到了一个downvote。原始问题中的代码不再有效，但如果用上面的xlim（）调用替换scale_x_date（。）调用，则没有错误。

ggplot(z, aes(Month, Value)) + 
     geom_bar(fill="orange",size=.3,  stat="identity", position="identity") +
     geom_smooth(data=z,aes(Month,Value,group=1), method="lm", size=2, color="navyblue") + 
     xlim(as.Date(c('1/1/2011', '1/1/2013'), format="%d/%m/%Y") )

Answer 3

这是使用ggplot 3.1的解决方案，它需要对原始代码进行最少的调整：

ggplot(z, aes(Month, Value)) + 
    geom_bar(fill="orange",size=.3, stat="identity", position="identity") +
    geom_smooth(data=z,aes(Month,Value,group=1), method="lm", size=2, color="navyblue") + 
    scale_x_date(date_breaks = "1 month", 
           limits = as.Date(c('1/1/2011', '1/1/2013'), format="%d/%m/%Y"),
           date_labels="%b-%Y" ) +
    theme(axis.text.x = element_text(angle = 90))

最后的theme()是可选的，但是如果您想使用原始的"%b-%Y"格式字符串，则使格式更易于阅读。