Агрегируйте значения в строках, зависящие от значений в другом столбце, используя r

Мы можем использовать case_when, чтобы изменить «Движения», которые больше или равны 3, на >=3, использовать это как группирующую переменную и summarise другие столбцы.

library(dplyr)
df %>%
    group_by(Moves = factor(case_when( Moves >=3 ~ '>=3', 
       TRUE ~ as.character(Moves)), levels = c('0', '1', '2', '>=3'))) %>%
     summarise(across(everything(),  ~ if (all(is.na(.))) NA_real_ 
           else sum(., na.rm = TRUE)), .groups = 'drop')

-выход

# A tibble: 4 x 3
#  Moves   Men Women
#  <fct> <dbl> <dbl>
#1 0       0.5   0.4
#2 1       0.3   0.5
#3 2       0.1  NA  
#4 >=3     0.1   0.1

Или используя fct_collapse из forcats

library(forcats)
df %>% 
  group_by(Moves = fct_collapse(as.character(Moves), 
  `>=3` = as.character(Moves[Moves >=3]))) %>% 
  summarise(across(everything(),  ~ if (all(is.na(.))) NA_real_  
        else sum(., na.rm = TRUE)), .groups = 'drop')