使用ggplot2时月份显示不正确

Question

您好，March在我的图表中出现了两次，但在我的数据中却没有出现。

我的数据看起来像。 我的数据帧称为try1。

    Month                 Year    tcol
   2016-01-01 00:00:00    06      1461.0
   2016-02-01 00:00:00    06      259.5
   2016-03-01 00:00:00    06      191.2
   2016-04-01 01:00:00    06      151.5
   2016-05-01 01:00:00    06      119.6
   2016-06-01 01:00:00    06      1372.5
   2016-07-01 01:00:00    06      954.0
   2016-08-01 01:00:00    06      1784.0
   2016-09-01 01:00:00    06      1369.0
   2016-10-01 01:00:00    06      6077.0
   2016-11-01 00:00:00    06      1638.0
   2016-12-01 00:00:00    06      3308.0

和我的代码看起来像。

ggplot(try1, aes(Month,tcol)) + 
       geom_point(aes(colour = Year),size=2) + 
       geom_line(aes(colour = Year), size=0.73)+
       theme_bw()+
       guides(col = guide_legend(ncol = 2))+
       scale_x_datetime(
                        breaks=date_breaks("1 months"), 
                        labels=date_format("%B"))+
       xlab("")+ #x axis label 
       ylab("Total Coliforms")

问题是，当我绘制图形时，三月出现两次。 和十月似乎被排除在外。

结果图

谢谢你的帮助。

Answer 1

我怀疑这是时区问题。 例如，使用此数据

structure(list(Month = structure(list(sec = c(0, 0, 0, 0, 0, 
0, 0, 0, 0, 0, 0, 0), min = c(0L, 0L, 0L, 0L, 0L, 0L, 0L, 0L, 
0L, 0L, 0L, 0L), hour = c(0L, 0L, 0L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 0L, 0L), mday = c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 
1L, 1L), mon = 0:11, year = c(116L, 116L, 116L, 116L, 116L, 116L, 
116L, 116L, 116L, 116L, 116L, 116L), wday = c(5L, 1L, 2L, 5L, 
0L, 3L, 5L, 1L, 4L, 6L, 2L, 4L), yday = c(0L, 31L, 60L, 91L, 
121L, 152L, 182L, 213L, 244L, 274L, 305L, 335L), isdst = c(0L, 
0L, 0L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 0L, 0L), zone = c("GMT", 
"GMT", "GMT", "BST", "BST", "BST", "BST", "BST", "BST", "BST", 
"GMT", "GMT"), gmtoff = c(NA_integer_, NA_integer_, NA_integer_, 
NA_integer_, NA_integer_, NA_integer_, NA_integer_, NA_integer_, 
NA_integer_, NA_integer_, NA_integer_, NA_integer_)), .Names = c("sec", 
"min", "hour", "mday", "mon", "year", "wday", "yday", "isdst", 
"zone", "gmtoff"), class = c("POSIXlt", "POSIXt"), tzone = c("Europe/London", 
"GMT", "BST")), Year = c(6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 6L, 
6L, 6L, 6L), tcol = c(1461, 259.5, 191.2, 151.5, 119.6, 1372.5, 
954, 1784, 1369, 6077, 1638, 3308)), .Names = c("Month", "Year", 
"tcol"), row.names = c(NA, -12L), class = "data.frame")

我可以复制您的图表。 尝试更改时区

attr(try1$Month, "tzone") <- "UTC"

和重新绘制。

---

更新。 我想知道为什么将时区更改为“ UTC”有效。 事实证明date_format()带有一个tz参数，默认为“ UTC”。 参见?date_format 。 这意味着，除了将Month的时区更改为“ UTC”，您还可以通过将date_format()的tz参数更改为Month的原始时区来解决问题，您可以通过attr(try1$Month, "tzone") 。