tests/test3.R

myfun <- function() {
  Sys.sleep(0.2)
  a <- runif(1e4)
  b <- sample(1e4)
  df <- data.frame(a, b)
  splt.vec <- rep(1:10, 1000)
  df.split <- split(df, splt.vec)
  unsplit(df.split, splt.vec)
}
brodieG/treeprof documentation built on Nov. 11, 2021, 1:36 a.m.