R语言：按小时聚合并计算组内另一字段的最大值

嘿，我来帮你搞定这个需求！从你的描述来看，你现在有一组数据框（s_df_array），前两个结构一致，第三个列名带ber.前缀，目前只能统计x$start的出现次数，想要改成按时间步长分组，同时计算每组内指定字段的最大值。下面分步骤给你讲解实现方法（假设你用的是R语言，毕竟提到了数据框和x$start）：

1. 统一数据框结构（处理ber.前缀列名） #

首先得把第三个数据框的列名和前两个对齐，去掉ber.前缀，这样后续操作才能统一处理：

library(tidyverse)

# 遍历所有数据框，去除列名的ber.前缀
processed_dfs <- purrr::map(s_df_array, function(df) {
  colnames(df) <- stringr::str_remove(colnames(df), "^ber\\.")
  return(df)
})

2. 合并数据（可选：如果需要跨数据框聚合） #

如果要把所有数据框的内容放在一起聚合，就用bind_rows合并：

combined_df <- dplyr::bind_rows(processed_dfs, .id = "source_df")
# .id参数会新增一列标记数据来源，不需要的话可以去掉

3. 按时间步长分组并计算最大值 #

这里分两种常见情况：

情况A：时间是日期/时间类型（如POSIXct） #

用lubridate包的floor_date函数生成时间分组，支持按小时、天、分钟甚至自定义步长（比如15分钟）：

# 替换成你要计算最大值的字段名（比如your_target_column）
# 时间步长unit可以换成"day"、"minute"、"15 minutes"等
aggregated_result <- combined_df %>%
  dplyr::mutate(time_group = lubridate::floor_date(start, unit = "hour")) %>%
  dplyr::group_by(time_group) %>%
  dplyr::summarise(
    max_target = max(your_target_column, na.rm = TRUE), # 核心：求每组最大值
    count_start = dplyr::n() # 保留你之前需要的start出现次数统计
  ) %>%
  dplyr::ungroup()

情况B：时间是数值型（如时间戳、整数步长） #

如果start是数值型（比如连续的时间戳），比如每10个单位为一步长，用floor(start/step)*step生成分组：

step_size <- 10 # 替换成你的实际时间步长
aggregated_result <- combined_df %>%
  dplyr::mutate(time_group = floor(start / step_size) * step_size) %>%
  dplyr::group_by(time_group) %>%
  dplyr::summarise(
    max_target = max(your_target_column, na.rm = TRUE),
    count_start = dplyr::n()
  ) %>%
  dplyr::ungroup()

4. 单独处理每个数据框（可选） #

如果不需要合并，想每个数据框单独按时间步长聚合：

individual_agg_results <- purrr::map(processed_dfs, function(df) {
  df %>%
    dplyr::mutate(time_group = lubridate::floor_date(start, unit = "hour")) %>%
    dplyr::group_by(time_group) %>%
    dplyr::summarise(
      max_target = max(your_target_column, na.rm = TRUE),
      count_start = dplyr::n()
    ) %>%
    dplyr::ungroup()
})

关键提醒 #

• 记得把代码中的your_target_column替换成你实际要计算最大值的字段名
• 如果你的start列不是标准日期时间格式，先要用lubridate::ymd_hms()或类似函数转换
• na.rm = TRUE是为了忽略缺失值，不需要的话可以直接去掉

内容的提问来源于stack exchange，提问作者Testificator