tests/testthat/test-hello.R

context("Testing hello() function.")

test_that("We can call the simile hello function",{

  x <- c(1:100)
  out1 <- hello(x)

  expect_equal(out1, 3.14)

})
martakarass/tester documentation built on May 6, 2019, 8:30 p.m.