Nothing
testthat::test_that("multiplication works", {
fname = system.file(
file.path("nifti", "mniRL.nii.gz"),
package = "oro.nifti")
testthat::expect_silent({
eve = readNIfTI(fname)
})
testthat::expect_silent(orthographic(eve))
testthat::expect_silent(image(eve, z = 45))
testthat::expect_silent(image(eve, z = 45, plot.type = "single"))
testthat::expect_silent(image(eve, z = c(45, 50), plot.type = "single"))
testthat::expect_silent(slice(eve, z = c(45, 50)))
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.