O trecho das linhas 16 a 21 de finalModel() não poderiam ser substituídas por algo como
x <- data.frame()
for (arquivo in evall){
y <- read.table(file = arquivo, header = T, row.names = 1)
x <- rbind(x, y)
}
?
Isso eliminaria a dependência de data.table.