r - Split() 函数用于分成组，而不是单个元素 - 在 R 中

Question

有没有办法将数据帧拆分为元素组而不是单个元素。例如，在下面的代码中

rs_scq_user_ <- split(regular_season, list(regular_season$season,
                regular_season$category, regular_season$question))

在“季节”栏中说，我想要

winter, spring

呆在一起

summer, fall

待在一起。我该怎么做呢？

Answer 1

一个选项是为此创建一个逻辑列。下面是带有 TRUE 的“标志”值表示“冬天”、“ Spring ”和 FALSE将自动成为 res，即“夏季”、“秋季”(假设数据中只有 4 个季节)

regular_season$flag <- with(regular_season, season %in% 
        c('winter', 'spring'))      

然后，使用 split使用“类别”、“问题”和“标志”而不是“季节”

lst1 <- split(regular_season, regular_season[c('category', 'question', 
         'flag')], drop = TRUE)

或者另一个选项是 group_split来自 dplyr

library(dplyr)
regular_season %>%
    group_split(category, question, flag = season %in% c('winter', 'spring')) 

或者，如果我们更喜欢将一个串联的“季节”作为新的“季节”

regular_season %>%
    group_split(category, question, 
       season_concat = case_when(season %in% c('winter', 'spring') 
                 ~ 'winter_spring', TRUE ~ 'summer_fall'))