R - Combine text files vertically

Lets say if you want to combine some selected xyz files vertically from a single folder. Then this task can be done in R. Make sure to check whether that particular file is in comma formatted or Space  formatted and you need to make those changes accordingly.

workDir <- "Q:/Jellys Ferry Drainage/LiDAR_Before_Projection/"
setwd(workDir)
inData1 <- read.csv("1132n0266e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData2 <- read.csv("1134n0264e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData3 <- read.csv("1134n0266e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData4 <- read.csv("1134n0268e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData5 <- read.csv("1136n0264e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData6 <- read.csv("1136n0266e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData7 <- read.csv("1136n0268e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData8 <- read.csv("1138n0264e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData9 <- read.csv("1138n0266e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData10 <- read.csv("1138n0268e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData11 <- read.csv("1140n0264e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
inData12 <- read.csv("1140n0266e5k_XYZ.txt", header=FALSE, sep=",", as.is=TRUE)
outData <- rbind(inData1, inData2, inData3, inData4, inData5, inData6, inData7, inData8, inData9, inData10, inData11, inData12)
write.table(outData, "Total_XYZ_Before_Projection.txt", sep=",", col.names=FALSE, row.names=FALSE)