tests/testthat/test-max3.R

library(AnthropMMD)
data(toyMMD)

test_that("max3 gives correct answer", {
  expect_equal(max3(binary_to_table(toyMMD)), 20)
})

Try the AnthropMMD package in your browser

Any scripts or data that you put into this service are public.

AnthropMMD documentation built on Aug. 8, 2023, 5:12 p.m.