## Not run:
# # nim is an object of class nifti
# dd = dropEmptyImageDimensions(nim, keep_ind = TRUE)
# remake = replace_dropped_dimensions(img = dd$outimg,
# inds = dd$inds,
# orig.dim = dd$orig.dim)
# all.equal(nim, remake)
# ## End(Not run)
Run the code above in your browser using DataLab