library(testthat) library(ggPMX) library(data.table) setDTthreads(1) test_check("ggPMX")