library(testthat) library(nbTransmission) test_check("nbTransmission")