使用 ggplot2 更改时间序列上的 x 刻度数

我正在尝试绘制时间序列x_output看起来像这样：

              timestamp   city wait_time weekday     time
    2015-07-14 09:00:00 Boston       1.6 Tuesday 09:00:00
    2015-07-14 09:01:00 Boston       1.8 Tuesday 09:00:00
    2015-07-14 09:02:00 Boston       2.4 Tuesday 09:00:00
    2015-07-14 09:03:00 Boston       2.9 Tuesday 09:00:00
    2015-07-14 09:04:00 Boston       4.5 Tuesday 09:00:00
    2015-07-14 09:05:00 Boston       5.6 Tuesday 09:00:00

这是我绘制它的方式：

brks <- seq(1, length(x_output$timestamp), 10)
brks_labels <- x_output[brks, ]

p <- ggplot(x_output, aes(x=as.character(timestamp), y=wait_time, group=city)) + geom_line(aes(color=city), size=1.5) + theme(axis.text.x = element_text(angle = 90, hjust=1), legend.position = "bottom") + labs(x=NULL, y="Waiting time (minutes)") + scale_x_discrete(breaks = brks, labels = brks_labels)
print(p)

我必须使用x_output$timestamp作为一个字符（即分类变量），因为否则，ggplot2 认为它是连续的，并且包括没有值的白色空白区域。

然而由于某种原因，scale_x_discrete似乎不起作用。我相信我得到了正确的休息输入，但是，标签现在没有显示。有谁知道为什么？这是情节：

我试图简单地让标签每 10 个时间戳出现在 x 轴上（这就是为什么我将中断放入数组中，如下所示brks).

您的休息时间必须与您的休息时间类型相同aes(x=, i.e. scale_x_discrete(breaks=x_output$timestamp[brks]) works.

但请注意，将时间戳转换为这样的分类在时间尺度上可能不准确 - 如果时间戳跳过 2 分钟，其余时间戳跳过 1 分钟，这不会反映在您的图表上。

我认为你最好保留 X 作为日期时间，并使用+ scale_x_datetime(breaks=date_breaks("10 mins"))。如果您有多个时间窗口，中间没有数据，则可以使用变量来指示每行属于哪个“窗口”，并且facet_wrap并排绘制窗口，这样您就可以跳过间隙，同时保留 x 轴比例。例如。你可以facet_wrap by weekday如果您的数据仅针对每天的特定窗口。