tests/testthat/test-matchr_image.R

In UPGo-McGill/matchr: Fast and Reliable Matching of Images

#### TESTS FOR matchr_image ####################################################

test_that("matchr_image handles NA", {
  expect_true(is.na(test_na))
})

test_that("matchr_image objects are printed properly", {
  expect_output(print(test_img), "300 x 225")
  expect_output(print(test_na), "NA")
})

test_that("other methods works", {
  expect_true(is_image(test_img))
  expect_output(str(test_img), "image")
})