date()
[1] "Sun Sep 10 16:20:22 2023"
devtools::load_all()
ℹ Loading readODS
## generate a 3000 x 8 data.frame
set.seed(721831)
df1 <- data.frame(a1 = sample(c(1:100), size = 3000, replace = TRUE),
b1 = sample(c(3.14, 3.1416, 12.345, 721.831), size = 3000, replace = TRUE),
c1 = sample(LETTERS, size = 3000, replace = TRUE),
d1 = sample(c(1L:100L), size = 3000, replace = TRUE),
a2 = sample(c(1:100), size = 3000, replace = TRUE),
b2 = sample(c(3.14, 3.1416, 12.345, 99.831), size = 3000, replace = TRUE),
c2 = sample(LETTERS, size = 3000, replace = TRUE),
d2 = sample(c(1L:100L), size = 3000, replace = TRUE))
path <- tempfile(fileext = ".ods")
write_ods(df1, path = path)
system.time(write_ods(df1, path = path, sheet = "aaaa", append = TRUE))
user system elapsed
0.250 0.028 0.285
system.time(write_ods(df1, path = path, sheet = "aaaa", update = TRUE))
user system elapsed
0.325 0.032 0.358
system.time(write_ods(mtcars, path = path, sheet = "aaaa", update = TRUE))
user system elapsed
0.214 0.028 0.242
sessionInfo()
R version 4.3.1 (2023-06-16)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: Ubuntu 22.04.3 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.1.0 testthat_3.1.10
loaded via a namespace (and not attached):
[1] utf8_1.2.3 stringi_1.7.12 hms_1.1.3 digest_0.6.33
[5] magrittr_2.0.3 evaluate_0.21 pkgload_1.3.2.1 fastmap_1.1.1
[9] cellranger_1.1.0 rprojroot_2.0.3 jsonlite_1.8.7 zip_2.3.0
[13] processx_3.8.2 pkgbuild_1.4.2 sessioninfo_1.2.2 brio_1.1.3
[17] urlchecker_1.0.1 ps_1.7.5 promises_1.2.1 purrr_1.0.2
[21] fansi_1.0.4 cli_3.6.1 shiny_1.7.5 rlang_1.1.1
[25] crayon_1.5.2 ellipsis_0.3.2 remotes_2.4.2.1 withr_2.5.0
[29] cachem_1.0.8 yaml_2.3.7 devtools_2.4.5 tools_4.3.1
[33] tzdb_0.4.0 memoise_2.0.1 httpuv_1.6.11 vctrs_0.6.3
[37] R6_2.5.1 mime_0.12 lifecycle_1.0.3 stringr_1.5.0
[41] fs_1.6.3 htmlwidgets_1.6.2 usethis_2.2.2 miniUI_0.1.1.1
[45] pkgconfig_2.0.3 desc_1.4.2 callr_3.7.3 pillar_1.9.0
[49] later_1.3.1 glue_1.6.2 profvis_0.3.8 Rcpp_1.0.11
[53] xfun_0.40 tibble_3.2.1 rstudioapi_0.15.0 knitr_1.43
[57] xtable_1.8-4 htmltools_0.5.6 rmarkdown_2.24 readr_2.1.4
[61] compiler_4.3.1 prettyunits_1.1.1
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.