# NOT RUN {
require(easycsv)
directory = getwd()
table1 <- data.frame(matrix(1:9, nrow = 3))
write.csv(table1, file = file.path(directory,"/table1.csv"))
write.csv(table1, file = file.path(directory,"/table2.txt"))
loadcsv_multi(directory, extension = "BOTH")
# }
Run the code above in your browser using DataLab