library(testthat) library(sgmodel) test_check("sgmodel")