data.table::setDTthreads(1)
if(require(testthat))test_check("nc")