0byt3m1n1
Path:
C:
/
Program Files
/
R
/
R-4.2.2
/
library
/
vroom
/
bench
/
taxi_writing
/
[
Home
]
File: base-zstandard.R
{ library(vroom) data <- vroom(file, col_types = c(pickup_datetime = "c")) vroom:::vroom_materialize(data, replace = TRUE) } { con <- pipe(sprintf("zstd > %s", tempfile(fileext = ".zst")), "wb") write.table(data, con, sep = "\t", quote = FALSE, row.names = FALSE) close(con) }