tests/testthat/test_logic_operation.R

test_that("logic_operation", {
  
  found1 <- logic_operation()

  expect_match(class(found1), "character")
  expect_true(length(found1) == 9)
  expect_equal(found1, logic_operation_default())
  
})

Try the avidaR package in your browser

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

avidaR documentation built on June 22, 2024, 9:21 a.m.