У меня есть несколько разделенных табуляцией файлов двух столбцов следующим образом:
[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)
Любая помощь по этому поводу?
С уважением
Зиллура