file = system.file("extdata", "example.nii.gz", package = "RNifti")
img = RNifti::readNifti(file)
slice_start(img)
slice_start(img) = 4
stopifnot(slice_start(img) == 4)
slice.start(img)
slice.start(img) = 0
Run the code above in your browser using DataLab