在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()