假设两个文件为file1.csv和file2.csv,共同的列为"col_name",可以使用下面的代码将两个文件按照该列的内容提取共有的行并合并为一个文件:

# 读取文件1和文件2
file1 <- read.csv("file1.csv")
file2 <- read.csv("file2.csv")

# 提取共有的行
common_rows <- intersect(file1$col_name, file2$col_name)

# 从文件1中提取共有的行
file1_common <- file1[file1$col_name %in% common_rows, ]

# 从文件2中提取共有的行
file2_common <- file2[file2$col_name %in% common_rows, ]

# 合并两个文件中的共有行
merged_file <- rbind(file1_common, file2_common)

# 将结果写入新的CSV文件
write.csv(merged_file, "merged_file.csv", row.names = FALSE)

其中,intersect()函数用于找到共有的行,%in%运算符用于判断一个元素是否在一个向量中,rbind()函数用于合并两个数据框。最后,使用write.csv()函数将结果写入一个新的CSV文件

在R语言中两个文件中有一列相似的内容但是行数不一样想把这两个文件按照该列的内容提取共有的行并合并为一个文件

原文地址: https://www.cveoy.top/t/topic/gTrB 著作权归作者所有。请勿转载和采集!

免费AI点我,无需注册和登录