transpose benchmark #15

Activity

1. tdhock commented on Dec 18, 2023

   

   tdhock

   on Dec 18, 2023

   OwnerAuthor

   More actions

   atime.result <- atime::atime(
     N=10^seq(1, 9, by=0.5),
     setup={
       set.seed(1)
       l = list(sample(N), sample(letters, N, TRUE))
     },
     base = lapply(seq(length(l[[1]])), function(x) lapply(l, `[[`, x)),
     dt = data.table::transpose(l, list.cols=TRUE),
     seconds.limit=1
   )
   atime.refs <- atime::references_best(atime.result)
   plot(atime.refs)
   atime.pred <- predict(atime.refs, seconds=1, kilobytes=1000)
   plot(atime.pred)