# NOT RUN {
# get filename for example NII file included in nifti.io package
ref.nii <- system.file("extdata", "egBrain.nii", package="nifti.io")
# set new filename (using temporary directory for example)
tdir <- tempdir()
new.nii <- paste0(tdir, "/new.nii")
# initialize new NII file
init.nii(new.nii = new.nii, ref.nii = ref.nii)
# }
Run the code above in your browser using DataLab