tests/testthat/test-antsImageClone.R
In muschellij2/atropos: Core Software Infrastructure for 'ANTsR'
context("Cloning image")
test_that("image can be cloned", {
img1 <- antsImageRead( getANTsRData("r16"), 2 )
img2 <- antsImageClone(img1)
expect_true(sum(abs(as.array(img1))) == sum(abs(as.array(img2))))
})
muschellij2/atropos documentation built on May 4, 2019, 3:17 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.
context("Cloning image")
test_that("image can be cloned", {
img1 <- antsImageRead( getANTsRData("r16"), 2 )
img2 <- antsImageClone(img1)
expect_true(sum(abs(as.array(img1))) == sum(abs(as.array(img2))))
})
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.