library(testthat) library(thor) test_check("thor")