tests/testthat/test.R

In bnbsystems/ddt: Data Driven Testing

library(stringr)

context("String length")
test_that("str_length is number of characters", {
  expect_equal(str_length("a"), 1)
  expect_equal(str_length("ab"), 2)
  expect_equal(str_length("abc"), 3)
})