tests/testthat/testvalues.R
In hovisa/annar: Simple Functions
library(annar)
context("Numbers OK")
test_that("answers are correct",{
expect_equal(sq(10), 10^2)
expect_equal(sq(20), 20^2)
expect_equal(RP(3, 3), 3^3)
expect_equal(RP(2, 4), 2^4)
expect_equal(RP(NA, 10), NA_integer_)
expect_less_than(roll(1:20), 2*20 + 1)
expect_more_than(roll(), 1)
})
hovisa/annar documentation built on May 17, 2019, 4:52 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
library(annar)
context("Numbers OK")
test_that("answers are correct",{
expect_equal(sq(10), 10^2)
expect_equal(sq(20), 20^2)
expect_equal(RP(3, 3), 3^3)
expect_equal(RP(2, 4), 2^4)
expect_equal(RP(NA, 10), NA_integer_)
expect_less_than(roll(1:20), 2*20 + 1)
expect_more_than(roll(), 1)
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.