powered by
fail(message = "Failure has been forced.")
test_that("this test fails", fail())
Run the code above in your browser using DataLab