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 变量时明确定义了一个时区(您应该),您应该在此处传递该时区。
我正在尝试使用 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 变量时明确定义了一个时区(您应该),您应该在此处传递该时区。