library(testthat)
library(rigr)
library(car)

test_check("rigr")