(test.list.named <- atime::atime_test_list(
N=as.integer(10^seq(1,3,by=0.5)),
setup={
set.seed(1)
data.vec <- rnorm(N)
},
mean_norm=atime::atime_test(expr=binsegRcpp::binseg("mean_norm",data.vec)),
poisson=atime::atime_test(expr=binsegRcpp::binseg("poisson",data.vec)),
NULL))
## https://github.com/tdhock/binsegRcpp/blob/atime-test-funs/.ci/atime/tests.R
## has a real example, see how to run it in tests/testthat/test-versions.R
Run the code above in your browser using DataLab