按因子拆分数据框并删除列不相等的行
创始人
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)

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

上一篇：按引用或按值扫描函数

下一篇：按因子拆分数据框，并根据因子和附加描述命名新数据框，如“新数据框(因子)”。

相关内容

热门资讯

一分钟了解(德扑之星设置)外挂... 一分钟了解(德扑之星设置)外挂透明挂辅助插件(透视)细节揭秘(2021已更新)(哔哩哔哩)；亲真的是...
第二分钟了解(aapoker模... 第二分钟了解(aapoker模拟器)外挂智能ai辅助黑科技(透视)透视教程(2025已更新)(哔哩哔...
第8分钟了解(Wepoke规律... 第8分钟了解(Wepoke规律)外挂透明挂辅助神器(透视)解密教程(2026已更新)(哔哩哔哩)是一...
七分钟了解(德州alphax)... 七分钟了解(德州alphax)外挂透明挂辅助神器(透视)2025新版教程(2024已更新)(哔哩哔哩...
第7分钟了解(WPK)外挂辅助... 第7分钟了解(WPK)外挂辅助插件安装器(透视)科技教程(2026已更新)(哔哩哔哩)；第7分钟了解...
三分钟了解(微扑克神器)外挂辅... 三分钟了解(微扑克神器)外挂辅助插件安装神器(透视)规律教程(2022已更新)(哔哩哔哩)是一款可以...
一分钟带你了解！hhpoker... 一分钟带你了解！hhpoker开挂教程，微信小程序牵手辅助，德州论坛（有挂教程）-哔哩哔哩微信小程序...
推荐几款新版！拱趴大菠萝可以开... 推荐几款新版！拱趴大菠萝可以开挂，九九联盟后台可以操作，我来教教你（证实有挂）-哔哩哔哩1、九九联盟...
我来教教大家！wepoker可... 我来教教大家！wepoker可以开辅助，打哈儿床将辅助最新，2025新版总结（有挂教学）-哔哩哔哩1...
一分钟了解！hhpoker辅助... 一分钟了解！hhpoker辅助挂，和和营口麻将辅助，解密教程（有挂方略）-哔哩哔哩1、在和和营口麻将...