按因子拆分数据框并删除列不相等的行
创始人
2024-08-22 12:00:12
0

假设有以下数据框:

df <- data.frame(group = rep(LETTERS[1:2], each = 3), value = 1:6, stringsAsFactors = FALSE)
df$extra_col <- c("a", "b", "c", "d", "e", "f")

现在我们想按组将数据框拆分,并删除不一致的行,可以使用以下代码:

split_df <- lapply(unique(df$group), function(x) {
  temp_df <- df[df$group == x, ]
  temp_df[, ncol(temp_df) - 1] <- NULL
  temp_df
})

final_df <- do.call(rbind, split_df)

这将返回拆分后的数据框列表,每个数据框都只包含因子值相同的行,并删除最后一列,最后将它们连接成单个数据框。

相关内容

热门资讯

最新研发!wepoke辅助透视... 最新研发!wepoke辅助透视教程,wepoke有没有挂,玩家教你(一贯真的是有挂)1、在wepok...
透视软件!红龙poker透视,... 透视软件!红龙poker透视,新广西老友辅助,详细教程(有挂辅助);小薇(透视辅助)致您一封信;亲爱...
记者揭秘!we poke软件免... 记者揭秘!we poke软件免费版,wpk德州透视辅助,详细教程(都是有挂);无聊就玩这款wpk德州...
透视线上!德普之星有没有挂,川... 透视线上!德普之星有没有挂,川娱竞技血战辅助器,新版2025教程(有挂软件);川娱竞技血战辅助器软件...
玩家必备!红龙扑克真假,aap... 玩家必备!红龙扑克真假,aapoker辅助工具存在,可靠教程(从前是真的有挂)是一款可以让一直输的玩...
透视玄学!wpk辅助器安装,福... 透视玄学!wpk辅助器安装,福建大玩家插件,德州教程(有挂透视);福建大玩家插件软件透明挂更新新赛季...
玩家分享!wopoker辅助v... 玩家分享!wopoker辅助v3.0,德州免费辅助神器app,力荐教程(原生真的有挂)1、金币登录送...
透视有挂!wpk辅助插件,闲逸... 透视有挂!wpk辅助插件,闲逸辅助脚本,存在挂教程(有挂透明);实战中需综合运用上述技巧,并根据牌桌...
实测教程!德州之星有辅助挂吗,... 实测教程!德州之星有辅助挂吗,德州之星外挂,wpk教程(从来有挂)是一款可以让一直输的玩家,快速成为...
透视计算!wpk透视脚本视频,... 透视计算!wpk透视脚本视频,闲来山水广西辅助,技巧教程(有挂教程);1.闲来山水广西辅助 ai辅助...