library(hellodev)
testthat::context("hello message")
testthat::test_that("hello message correctly given",{
testthat::expect_equal(hello("Anne"),"Hello Anne")
testthat::expect_equal(hello("Jane", call = TRUE),"Hello Jane")
testthat::expect_equal(hello("Jane", call = FALSE), "Hello world!")
})
testthat::test_that("custom message correctly given",{
testthat::expect_error(customMessage("Anne"))
testthat::expect_equal(customMessage("Anne","Nice to see you"),"Nice to see you Anne")
testthat::expect_equal(customMessage("Anne","Nice to see you", call =TRUE),"Nice to see you Anne")
testthat::expect_equal(customMessage("Anne","Nice to see you", call =FALSE),"Nice to see you")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.