Rychlé zápis dat pomocí fwrite()

Manipulace s daty pomocí data.table v R

Matt Dowle, Arun Srinivasan

Instructors, DataCamp

fwrite

Možnost zápisu sloupců list pomocí sekundárního oddělovače (|)

dt <- data.table(id = c("x", "y", "z"), val = list(1:2, 3:4, 5:6))
fwrite(dt, "fwrite.csv")
fread("fwrite.csv")

id  val
 x  1|2
 y  3|4
 z  5|6

fwrite() nabízí tři způsoby zápisu data a datetime – ISO, squash a epoch
Doporučuje standard ISO, který je výchozí hodnotou

now <- Sys.time()
dt  <- data.table(date = as.IDate(now), 
                  time = as.ITime(now), 
                  datetime = now)
dt

      date     time              datetime
2018-12-17 19:54:51   2018-12-17 14:54:51

# "ISO" is default
fwrite(dt, "datetime.csv", dateTimeAs = "ISO")

fread("datetime.csv")

      date       time                      datetime
2018-12-17   19:55:39   2018-12-17T19:55:39.735036Z

squash zapisuje yyyy-mm-dd hh:mm:ss jako yyyymmddhhmmss
Načte se jako celé číslo – pro extrakci měsíce, roku apod. stačí použít modulární aritmetiku, např. 20160912 %/% 10000 = 2016
Podporuje také rozlišení v milisekundách
Typ POSIXct (17 číslic s rozlišením ms) fread automaticky načte jako integer64

fwrite(dt, "datetime.csv", dateTimeAs = "squash")

fread("datetime.csv")

       date   time          datetime
1: 20181217 195539 20181217195539735

20181217 %/% 10000 
[1] 2018

epoch počítá počet dní (pro datum) nebo sekund (pro čas a datetime) od příslušné epochy
Referenční epochy jsou 1970-01-01, 00:00:00 a 1970-01-01T00:00:00Z pro date, time a datetime

fwrite(dt, "datetime.csv", dateTimeAs = "epoch")
fread("datetime.csv")

 date  time   datetime
17882 71871 1545076672

Manipulace s daty pomocí data.table v R