如何按日期对列表中的数据进行分组，并在R中对关联的数据值进行平均？

install.packages("dplyr")

library(dplyr)

# 创建示例数据框
df <- data.frame(
  date = c("2022-01-01", "2022-01-01", "2022-01-02", "2022-01-02"),
  value = c(10, 20, 30, 40)
)

# 将日期列转换为日期类型
df$date <- as.Date(df$date)

# 按日期分组，并计算平均值
result <- df %>%
  group_by(date) %>%
  summarise(average_value = mean(value))

# 查看结果
print(result)

# A tibble: 2 x 2
  date       average_value
  <date>             <dbl>
1 2022-01-01            15
2 2022-01-02            35