library(testthat) library(dominanceanalysis) test_check("dominanceanalysis")