tests/testthat/test_say_aloha.R

context("say_aloha function")

test_that("function takes one input", {

  testthat::expect_error(say_aloha("Irene", "Mitchell"))

  testthat::expect_is(say_aloha(c("Irene", "Mitchell"), print = FALSE), "character")
})
marcemiraval/greetings documentation built on May 28, 2019, 2:32 a.m.