library(testthat) library(PSGD) test_check("PSGD")