cal_max-methods {oro.nifti}

Extract Image Attribute cal_max

Description

Methods that act on the cal_max field in the NIfTI/ANALYZE header.

Usage

cal_max(object)

## S4 method for signature 'nifti'
cal_max(object)

## S4 method for signature 'anlz'
cal_max(object)

cal_max(object) <- value

## S4 replacement method for signature 'nifti'
cal_max(object) <- value

## S4 replacement method for signature 'anlz'
cal_max(object) <- value

cal.max(object)

## S4 method for signature 'nifti'
cal.max(object)

## S4 method for signature 'anlz'
cal.max(object)

cal.max(object) <- value

## S4 replacement method for signature 'nifti'
cal.max(object) <- value

## S4 replacement method for signature 'anlz'
cal.max(object) <- value

## S4 method for signature 'niftiImage'
cal.max(object)

## S4 replacement method for signature 'niftiImage'
cal.max(object) <- value

## S4 method for signature 'niftiImage'
cal_max(object)

## S4 replacement method for signature 'niftiImage'
cal_max(object) <- value

Arguments

object

is an object of class nifti or anlz.

value

is the value to assign to the cal_max field.

Details

See documentation on the ANALYZE and/or NIfTI data standards for more details.

Author(s)

John Muschelli [e-mail],
Brandon Whitcher [e-mail]

References

ANALYZE 7.5
http://eeg.sourceforge.net/ANALYZE75.pdf
NIfTI-1
http://nifti.nimh.nih.gov/

Examples

## Not run: 
url <- "http://nifti.nimh.nih.gov/nifti-1/data/avg152T1_LR_nifti.nii.gz"
urlfile <- file.path(system.file("nifti", package="oro.nifti"),
                     "mniLR.nii.gz")
download.file(url, urlfile, quiet=TRUE)

## End(Not run)
urlfile <- file.path(system.file("nifti", package="oro.nifti"),
                     "mniLR.nii.gz")
mniLR <- readNIfTI(urlfile)
cal.max(mniLR)
file = system.file("extdata", "example.nii.gz", package = "RNifti")
img = RNifti::readNifti(file)
cal.max(img)
cal_max(img)
cal.max(img) = 2500
stopifnot(cal_max(img) == 2500)
cal_max(img) = 2500
cal.min(img)
cal.min(img) = 2
stopifnot(cal_min(img) == 2)
cal_min(img)
cal_min(img) = 0
stopifnot(cal_min(img) == 0)