library(testthat) library(s3) test_check("s3")