tests/testthat/test_hello.R

In weekendwarri0r/HowToMakeRProject:

library(HowToMakeRPackage)
context("simple test")

test_that("Test of Return", {
  expect_equal(hello("Bob"), "Hello, Bob!")
  expect_equal(hello("My friend"), "Hello, My friend!")
  expect_equal(hello("Ms.Mary"), "Hello, Ms.Mary!")
})