library(testthat)
library(r4sub)

test_check("r4sub")