if (have_fs() && requireNamespace("oro.nifti", quietly = TRUE)) {
img = oro.nifti::nifti(array(rnorm(5*5*5), dim = c(5,5,5)))
mnc = nii2mnc(img)
img_file = mnc2nii(mnc, outfile = tempfile(fileext = ".nii"))
neurobase::readnii(img_file, verbose = TRUE)
}
Run the code above in your browser using DataLab