Assuming that all files have the same variable structure and can be merged with each other, the code below should work. If the imported files are xls, or another format, they can be parameterized by the import function itself. In this example, each file had only 1 line and two variables.
# adiciona o nome dos arquivos do diretório no vetor "arquivos"
arquivos <- dir()
print(arquivos)
# "1.txt" "2.txt" "3.txt"
# cria um data.frame que será a base
base <- data.frame(read.table(arquivos[1]))
head(base)
# V1 V2
# 1 10 11
# faz o laço de todos os arquivos seguintes
for(i in 2:length(arquivos)){
base2 <- data.frame(read.table(arquivos[i]))
base <- rbind(base, base2)
}
head(base)
# V1 V2
# 1 10 11
# 2 20 21
# 3 30 31