fix testthat