Skip to content

Latest commit

 

History

History
115 lines (86 loc) · 3.37 KB

roundtrip.md

File metadata and controls

115 lines (86 loc) · 3.37 KB

Testing the speed of nycflights roundtrip

nycflights round trip is an example in the writexl documentation. The original code looks like so:

library(nycflights13)
out <- readxl::read_xlsx(writexl::write_xlsx(flights))
all.equal(out, flights)

Let’s break it down

date()
[1] "Sun May 26 08:52:11 2024"

library(nycflights13)
system.time(path <- writexl::write_xlsx(flights))
   user  system elapsed 
  6.253   0.256   6.539 

system.time(out <- readxl::read_xlsx(path))
   user  system elapsed 
  2.166   0.632   2.820 

all.equal(out, flights)
[1] "Component \"time_hour\": 'tzone' attributes are inconsistent ('UTC' and 'America/New_York')"

The ODS version

devtools::load_all()
ℹ Loading readODS

system.time(path <- readODS::write_ods(flights))
   user  system elapsed 
 13.197   0.507  13.808 

system.time(out <- readODS::read_ods(path))
   user  system elapsed 
 26.976   1.752  28.813 

all.equal(out, flights)
[1] "Component \"time_hour\": 'tzone' attributes are inconsistent ('UTC' and 'America/New_York')"
[2] "Component \"time_hour\": Mean absolute difference: 15618.15"                                

sessionInfo()
R version 4.4.0 (2024-04-24)
Platform: x86_64-pc-linux-gnu
Running under: Ubuntu 22.04.4 LTS

Matrix products: default
BLAS:   /usr/lib/x86_64-linux-gnu/blas/libblas.so.3.10.0 
LAPACK: /usr/lib/x86_64-linux-gnu/lapack/liblapack.so.3.10.0

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

time zone: Europe/Berlin
tzcode source: system (glibc)

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] readODS_2.2.0.9999 testthat_3.2.1     nycflights13_1.0.2

loaded via a namespace (and not attached):
 [1] utf8_1.2.4        stringi_1.8.4     digest_0.6.35     magrittr_2.0.3   
 [5] evaluate_0.23     pkgload_1.3.4     fastmap_1.1.1     cellranger_1.1.0 
 [9] rprojroot_2.0.4   jsonlite_1.8.8    zip_2.3.1         writexl_1.5.0    
[13] pkgbuild_1.4.4    sessioninfo_1.2.2 brio_1.1.4        urlchecker_1.0.1 
[17] promises_1.3.0    purrr_1.0.2       fansi_1.0.6       cli_3.6.2        
[21] shiny_1.8.1.1     rlang_1.1.3       ellipsis_0.3.2    withr_3.0.0      
[25] remotes_2.5.0     cachem_1.0.8      yaml_2.3.8        devtools_2.4.5   
[29] tools_4.4.0       tzdb_0.4.0        memoise_2.0.1     httpuv_1.6.15    
[33] vctrs_0.6.5       R6_2.5.1          mime_0.12         lifecycle_1.0.4  
[37] minty_0.0.1       stringr_1.5.1     fs_1.6.3          htmlwidgets_1.6.4
[41] usethis_2.2.3     miniUI_0.1.1.1    desc_1.4.3        pkgconfig_2.0.3  
[45] pillar_1.9.0      later_1.3.2       glue_1.7.0        profvis_0.3.8    
[49] Rcpp_1.0.12       xfun_0.43         tibble_3.2.1      rstudioapi_0.16.0
[53] knitr_1.46        xtable_1.8-4      htmltools_0.5.8.1 rmarkdown_2.26   
[57] compiler_4.4.0    readxl_1.4.3