R/scl_inter.R

#' @docType methods
#' @rdname scl_inter-methods
#' @title Extract Image scl_inter attribute 
#' @name scl_inter-methods
#' @aliases scl_inter,character-method
#' @import oro.nifti
#' @export
#' @description scl_inter method for character types
#' @param object is a filename to pass to \link{fslval}
#' 
setMethod("scl_inter", "character", function(object) { 
  object = path.expand(object)
  stopifnot(file.exists(object))
  res = fslval(object, keyword = "scl_inter", verbose = FALSE)
  res = as.numeric(res)
  return(res)
})

Try the fslr package in your browser

Any scripts or data that you put into this service are public.

fslr documentation built on Aug. 25, 2022, 5:07 p.m.