fwrite
çok fazla döngü var mı .csv
çalışma dizinindeki dosyalar ancak yazdığımda .parquet
her seferinde üzerine yazar.
Birkaç yaklaşım denedim, temel olarak dosya adını kullanmaya çalışıyorum .csv
dosya adı, üzerine yazılmadan aşağıda gösterildiği gibi.
rm(list = ls())
gc()
# Set up environment #
require("data.table")
require("arrow")
# Set directory to data, define files #
setwd("E:/TransferComplete/07/")
files <- list.files(pattern = "csv")
for (i in files){ setwd("E:/TransferComplete/07/")
loopStart <- Sys.time()
bb <- fread(i,header = TRUE,sep = ",", data.table = FALSE, stringsAsFactors = FALSE,
select = c("x","y","z"))
gc()
write_parquet(bb,
'E:/P/i.parquet')
loopEnd <- Sys.time()
loopTime <- round(as.numeric(loopEnd) - as.numeric(loopStart), 0)
}