library(testthat) library(sglg) test_check("sglg")