Nothing
tests/testthat/test-crop-test.R
In nara: Native Raster Image Tools
test_that("Crop work works", {
nr <- nr_new(400, 400, 'hotpink')
nr2 <- nr_crop(nr, 0, 0, 4, 3)
expect_equal(ncol(nr2), 4)
expect_equal(nrow(nr2), 3)
expect_identical(unique(nr2), colorfast::col_to_int('hotpink'))
})
Try the nara package in your browser
Any scripts or data that you put into this service are public.
nara documentation built on May 28, 2026, 5:07 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.
test_that("Crop work works", {
nr <- nr_new(400, 400, 'hotpink')
nr2 <- nr_crop(nr, 0, 0, 4, 3)
expect_equal(ncol(nr2), 4)
expect_equal(nrow(nr2), 3)
expect_identical(unique(nr2), colorfast::col_to_int('hotpink'))
})
Try the nara package in your browser
Any scripts or data that you put into this service are public.
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.