以下是POSIXct中每日数据的箱线图示例：

set.seed(42)
df <- data.frame(date = sample(lubridate::ymd_h(c(
  2023040100, 2023050800, 2023051500, 2023051600)), 100, replace = TRUE),
  mgL = rnorm(100, mean = 29))

连续轴上箱线图的默认间距将找到适合该空间的分辨率。

ggplot(df, aes(date, mgL, group = date)) +
  geom_boxplot()

如果我们指定width = 1，盒子将是1个单位宽，在POSIX中是1秒，导致盒子太窄。

ggplot(df, aes(date, mgL, group = date)) +
  geom_boxplot(width = 1)

在7天间隔的情况下，前两根柱宽为一周，但最后两根（相隔一天）被挤压在一起，形成更窄的柱。

ggplot(df, aes(date, mgL, group = date)) +
  geom_boxplot(width = 60*60*24*7)

或者我们可以将x轴转换为日期，其中一个单位是一天。宽度为1时，最后两个条将排成一行，中间没有空间。任何更宽的和ggplot将挤压重叠的，以避免重叠。

ggplot(df, aes(as.Date(date), mgL, group = date)) +
  geom_boxplot(width = 1)

问题是datetime类。尝试整个过程中留下的日期作为字符的宽度应该工作。

这个解释直接取自@Jon Spring的评论：

“boxplot width 1将使方框宽度为1个单位。对于x轴上的POSIXct，1个单位是1秒，这对于这个数据来说太窄了。例如，尝试使用width = 60 * 60 * 24 * 5使它们的宽度为5天。棘手的B/c我看到一些比这更接近，所以你会有重叠”

library(lubridate)
library(dplyr)

df %>% 
  mutate(date = ymd_hms(date)) %>% 
  ggplot(aes(x = date, y = Chloride_mgL, group = date)) + 
  geom_boxplot(width = 2, outlier.shape = NA, color = "dark blue") + 
  theme_minimal() + 
  labs(y ="Chloride (mg/L)")

library(dplyr)
df %>% 
  ggplot(aes(x = date, y = Chloride_mgL, group = date)) + 
  geom_boxplot(width = 2, outlier.shape = NA, color = "dark blue") +
  theme_minimal() +
  labs(y = "Chloride (mg/L)")