library(testthat) library(badcontrols) test_check("badcontrols")