aux_file-methods: Extract Image Attribute 'aux_file'

In oro.nifti: Rigorous - 'NIfTI' + 'ANALYZE' + 'AFNI' : Input / Output

Extract Image Attribute aux_file

Description

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

Usage

aux_file(object)

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

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

aux_file(object) <- value

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

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

aux.file(object)

## S4 method for signature 'nifti'
aux.file(object)

## S4 method for signature 'anlz'
aux.file(object)

aux.file(object) <- value

## S4 replacement method for signature 'nifti'
aux.file(object) <- value

## S4 replacement method for signature 'anlz'
aux.file(object) <- value

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

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

Arguments

object	is an object of class nifti or anlz.
value	is the value to assign to the aux_file 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_RL_nifti.nii.gz"
urlfile <- file.path(system.file("nifti", package="oro.nifti"),
                    "mniRL.nii.gz")
download.file(url, urlfile, quiet=TRUE)

## End(Not run)
options("niftiAuditTrail"=FALSE)

urlfile <- file.path(system.file("nifti", package="oro.nifti"),
                     "mniRL.nii.gz")
mniRL <- readNIfTI(urlfile)
aux.file(mniRL)
aux.file(mniRL) <- "avg152T1_RL_nifti"
aux.file(mniRL)
file = system.file("extdata", "example.nii.gz", package = "RNifti")
img = RNifti::readNifti(file)
aux_file(img)
aux_file(img) = "hey"
stopifnot(aux_file(img) ==  "hey")

oro.nifti documentation built on Aug. 10, 2022, 5:09 p.m.