R/oimage.R

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

Defines functions oimage

Documented in oimage

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