library(testthat)
library(sgraph)
data(lesMis)
test_check('sgraph')