data-raw/timings_sort.R

library(magrittr)
library(wrswoR)

pkg <- devtools::as.package(".")
source(file.path(pkg$path, "data-raw", "benchmark_sort.R"))


N <- trunc(10 ** seq(1.5, 7, by = 0.5)) %>% setNames(nm = .)

timings_sort <- .benchmark_sort()

rextdata::use_extdata(timings_sort, overwrite = TRUE, compress = "xz")
krlmlr/wrswoR.benchmark documentation built on Feb. 19, 2022, 10:31 p.m.