tests/testthat/helpers-util.R

indexed_mean <- function(dat, indices) {
  sampling <- unlist(dat$val)[indices]
  c(mean(sampling), var(sampling))
}
fennerm/bootr documentation built on May 7, 2019, 8:43 a.m.