R ggplot:时间序列bbar图具有前导和滞后空格

library(ggplot2)
library(tidyr)

# 假设你的数据框df包含两列：date（日期）和value（值）
# 首先，确保date列是日期格式
df$date <- as.Date(df$date)

# 使用complete函数填充缺失的时间点
df_filled <- df %>%
  complete(date = seq(min(date), max(date), by = "day")) %>%
  replace_na(list(value = 0))  # 将缺失值替换为0或其他合适的值

# 使用ggplot2绘制条形图
ggplot(df_filled, aes(x = date, y = value)) +
  geom_bar(stat = "identity") +
  theme_minimal()

# 使用ggplot2绘制条形图，并调整x轴的范围和刻度
ggplot(df, aes(x = date, y = value)) +
  geom_bar(stat = "identity") +
  scale_x_date(limits = c(min(df$date), max(df$date)), date_breaks = "1 week") +  # 设置x轴的范围和刻度
  theme_minimal()

# 假设你的数据框df包含三列：date（日期）、category（类别）和value（值）
# 使用facet_wrap按类别绘制条形图
ggplot(df, aes(x = date, y = value)) +
  geom_bar(stat = "identity") +
  facet_wrap(~ category, scales = "free_x") +  # 按类别分面，并设置x轴为自由缩放
  theme_minimal()