scale_datetime 平移 x 轴

scale_datetime shifts x axis

我正在尝试使用 ggplot2 绘制一个 x 轴为 class "POSIXct" 的时间序列,它正在达到一定程度。

当我尝试使用 scale_x_datetime 操纵 x 轴中断和标签时,它会在 x 轴上产生一个月的偏移。

谁能解释一下,并提供解决方案?

示例简化代码:

start <- as.POSIXct("2014/07/01 00:00:00")
end <- as.POSIXct("2014/10/01 23:30:00")
interval <- as.difftime("00:30:00")
df <- data.frame(t=seq(start, end, by="1 day"))
df$v <- sample(1:100, replace=TRUE, nrow(df))

p <- ggplot(data=df, aes(x=t)) +
  geom_line(aes(y=v))

p2 <- p + scale_x_datetime(breaks=date_breaks("1 month"), labels=date_format("%b-%y"))

这是时区问题。 date_format 默认将时区设置为 "UTC" 并在内部调用 format.POSIXct 内部调用 as.POSIXlt。发生这种情况:

as.POSIXlt(start, "UTC")
#[1] "2014-06-30 22:00:00 UTC"

瞧,不同的月份。

您可以通过不更改时区来避免这种情况:

p + scale_x_datetime(breaks=date_breaks("1 month"), 
                     labels=date_format("%b-%y", tz = Sys.timezone(location = TRUE)))

如果您在创建 POSIXct 变量时明确定义了一个时区(您应该),您应该在此处传递该时区。