GGPLOT2X轴每天有很多小时。有没有办法可以在那天的几个小时内跨越X轴的日期？ 我有一个数据集，该数据集运行了很多天。 每天我都有多个小时。 在这个玩具示例中，我正在寻找3天，在三天中，我正在查看13个Indi的数据...

Question

。

，例如，考虑此示例代码：

library(ggplot2)

exp<-data.frame(
  date = c(rep("2025-02-01", 13), rep("2025-02-02", 13),rep("2025-02-03", 13)),
  hour = rep(seq(6, 18, 1),3),
  obs = runif(13*3, min=1, max=50)
)

exp |>
  mutate(
    date.hour = factor(paste0(date, " ", hour, " hour"), levels=unique(paste0(date, " ", hour, " hour")), ordered=TRUE) 
  ) |>
  ggplot(aes(x=date.hour, y=obs, group=1)) +
  geom_line() + 
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=1))

该图将生成以下图：

nove，我想知道的是，是否可以跨越整个小时的日期，以创建一个看起来像这样的图：

使用

legendry包装，您可以轻松地使用guide_axis_nested

Answer 1