tests/testthat/test-square.R

context("test-square")

test_that("multiplication works", {
  expect_equal(2 * 2, 4)
  expect_equal(square(2), 4)
  expect_equal(square(1:3), c(1,4,9))
  expect_equal(square("1"), c(1))
})
xuan-chen/test_625 documentation built on Nov. 10, 2019, 12:12 a.m.