如何从第 4 列 grouped_by 第 1 列中的 id 的第 3 列中获取最大值（范围 1-2）？

Question

我希望 R 将所有具有相同chargepoint_skey 和 socketsinuse 的行替换为仅具有特定chargepoint_skey 和 socketsinuse 的一行。 当然，这需要对所有单独的 chargepoint_skeys 进行。 所以一种总结。 我怎样才能完成这项工作？

到目前为止，我获取 dataframe 的代码（见图）：

vraag_5 <- FACT_CHARGESSESION_JOINDIMLOCATION %>%
             select(ChargePoint_skey, Socket_ID) %>%
             group_by(ChargePoint_skey) %>%
             mutate(Socket_ID = str_replace_all(Socket_ID, "XXXXXX", "0")) %>%
             mutate(socketsinuse = max(Socket_ID))

更改代码后更新：

数据框3

Answer 1

尝试将您的代码更改为：

vraag_5 <- FACT_CHARGESSESION_JOINDIMLOCATION %>%
                mutate(Socket_ID = as.numeric(stringr::str_replace_all(Socket_ID,
                                   "XXXXXX", "0"))) %>%
                group_by(ChargePoint_skey) %>%
                summarise(socketsinuse = max(Socket_ID, na.rm = TRUE))