library(testthat) test_check("RTriangle")