R/zimage.R

In exoplanetX/greyforecasting: A package for grey systems forecasting methods

Defines functions zimage

Documented in zimage

#' original image operator
#'
zimage <- function(x){
  r=x-x[1]
  return(r)
}