r - 如何在 R 中读取多个文本文件

Question

我有多个标签分隔两列文件，如下所示：

[enter code here][1]

我想像下面这样合并它们：

[enter code here][1]

在某些情况下，行名可能会丢失。我尝试了很多方法，但都没有得到预期的结果。也许我错过了一些东西。有什么帮助吗？

fls=list.files('/Users/mzillur/geo/data/E-GEOD-64573/')
ids <- read.table(fls[1], header=FALSE, sep="\t")[,1]
d1=do.call(cbind,lapply(fls,function(fn)read.table(fn,header=FALSE, sep="\t")[,2]))
d2=cbind(ids,d1)

对此有任何帮助吗？最好的问候 Zillur

标签： r

Answer 1

查看? map_dfc

library(purrr)

map_dfc(fls, read.table, header = FALSE, sep = "\t")