r - 在 R 中按天绘制 x 轴

Question

我有一个序列如下

ts <- data.frame(seq.POSIXt(as.POSIXlt("2018-07-14 00:00"), as.POSIXlt("2018-07-16 13:52"), by="min"))
names(ts)[1]="Timestamp"
ts$Timestamp=format(ts$Timestamp, "%Y-%m-%d %H:%M")

values=rnorm(3713)

我正在尝试在 r-bokeh 中生成一个图表，以便 xaxis 只显示天数（而不是小时/分钟）。

我努力了

   figure() %>% ly_lines(ts, values) %>% x_axis(label = "Date", format = list(months = "%Y-%m", days = "%d"))

但它挂起。我也试过 days="%Y-%m-%d" 但也没有成功。关于如何为时间序列生成折线图的任何想法，例如对于 x 轴，格式仅显示天数而不是每分钟。我也对 ggplot 解决方案持开放态度。

谢谢！

Answer 1

干得好！

library(tidyverse)

ts <- data.frame(seq.POSIXt(as.POSIXlt("2018-07-14 00:00"), as.POSIXlt("2018-07-16 13:52"), by="min"))
names(ts)[1]="Timestamp"
ts$Timestamp=format(ts$Timestamp, "%Y-%m-%d %H:%M")

values=rnorm(3713)

plot_df <- cbind(ts, values) %>% 
  mutate(time = as.POSIXct(Timestamp, format = "%Y-%m-%d %H:%M"))

plot_df %>% 
  ggplot(aes(x = time, y = values)) + 
  geom_line()