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

Question

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

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

将特定列附加在一起。

到目前为止我的代码

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")