tests/testthat/test_importImage.R

library(testthat)
library(biopixR)

test_that("importImage", {
  path2img <- system.file("images/beads.png", package = 'biopixR')

  expect_equal(load.image(path2img), importImage(path2img))

})

Try the biopixR package in your browser

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

biopixR documentation built on April 4, 2025, 1:07 a.m.