Очень длинный список ".asc" файлов в R и применяется do.call. Как с этим бороться?

Question

Надеюсь, вы можете помочь мне с этим. Я работаю над кодом, который позволяет мне собрать очень длинный список файлов.asc (они содержат 307200 (640*480) пикселей с информацией о температуре от тепловой ИК-камеры каждого из файлов). Я разработал код, объединяющий всего 5 файлов. Однако при попытке применить код ко всему списку файлов (например, более 4000 файлов.asc) R застревает. Мне сказали, что я должен изменить свой код, используя пакетную обработку или любой оптимизирующий код. Однако я не эксперт в этой области, и мне нужна помощь. Я включил сюда первую часть кода, которая перечисляет все файлы.asc и объединяет их в один фрейм данных.

temp = list.files(pattern="*.asc")
myfiles = do.call("cbind", lapply(temp, function(x) read.csv(x,
                  sep="\t",dec=",",stringsAsFactors=FALSE,header=FALSE)))
mf<-myfiles[c(-1:-8),]

colnames(mf)<-seq(1,ncol(mf),by=1)
rownames(mf)<-seq(1,nrow(mf),by=1)

for (i in 1:ncol(mf)){
      mf[,i]<-sub(",",".",mf[,i])
      mf[,i]<-sub("\t","",mf[,i])
      }

for(i in 1:ncol(mf)){
      mf[,i]<-as.numeric(mf[,i])
      }

Заранее спасибо за помощь!:)

Amaia