library(testthat) library(ri2) test_check("ri2")