從多個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")