Насколько я понимаю, вы могли бы извлечь пользу из чтения ?list.files
, ?read.table
, ?do.call
, ?sapply
. В качестве примера,
files = list.files(pattern="*.txt", path = ".")
all = lapply(files, read.table, sep=",")
combined = do.call(c, all)
(непроверенные)
РЕДАКТИРОВАТЬ: похоже, вы после ?ls
и ?get
сейчас,
vars = lapply(ls(pattern = "_n"), get)
do.call(c, vars)
или, более кратко,
sapply(ls(pattern = "_n"), get)