cbind 来自多个 csv 文件的特定列

Question

我有多个具有相同标题的 CSV 文件

我正在尝试将我所有 CSV 中的 log2FoldChange 和 padj 列 cbind 到一个数据框中。我希望最终结果看起来像这样

将特定列附加在一起。

到目前为止我的代码

files <- list.files(pattern = "*.csv")
res1 <- do.call(cbind, lapply(files,read.csv, header = T))
pos <- grep("log2FoldChange|padj", names(res1))
dataset <- res1[, pos]

但最后我的数据集中的列 (log2FoldChange, padj) 与 CSV 祖先的值不匹配。

任何帮助将不胜感激，在此先感谢。

Answer 1

你可以使用合并：

f1 <- read.csv("file1.csv")
f2 <- read.csv("file2.csv")
dataset <- merge(f1, f2, by.x = "row.names", by.y = "row.names")