library(testthat) library(rsat) test_check("rsat")