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

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

相关内容

热门资讯

安装Pillow时遇到了问题:... 遇到这个问题,可能是因为缺少libwebpmux3软件包。解决方法是手动安装libwebpmux3软...
安装React Native时... 当安装React Native时出现构建错误的情况,可以尝试以下解决方法:确保已经安装了最新版本的C...
安装Python库"... 安装Python库"firedrake"的解决方法如下:打开终端或命令提示符(Windows系统)。...
安装ug未能链接到许可证服务器 安装UG未能链接到许可证服务器是UG用户在安装软件时常遇到的问题之一。该问题的解决方法需要技术向的知...
安装Rails时构建webso... 在安装Rails时,如果构建websocket-driver时发生错误,可以尝试以下解决方法:更新系...
按转换模式过滤日志【%t】。 要按照转换模式过滤日志,可以使用正则表达式来实现。下面是一个示例代码,使用Java语言的Patter...
安装react-native-... 要安装react-native-onesignal并在应用关闭时仍能接收通知,可以按照以下步骤进行:...
Apache Nifi在Kub... Apache Nifi可以在Kubernetes上运行,并且已经准备好用于生产环境。下面是一个使用H...
安装React-Scripts... 这是因为React-Scripts使用Facebook工具包中的一些脚本。 joinAdIntere...
安装React Native时... 安装React Native时可能会出现各种错误,下面是一些常见错误和解决方法的代码示例:Error...