library(testthat) library(dpm) library(methods) test_check("dpm")