R/func.trimvar.RPD.R

Defines functions `func.trimvar.RPD`

`func.trimvar.RPD` <- function(functions, trim = 0.25, deriv = c(0,1))
{
  lista = depth.RPD(functions, trim = trim, deriv = deriv)$ltrim; 
  func.var(functions[lista, ])
}

Try the rainbow package in your browser

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

rainbow documentation built on Oct. 10, 2022, 1:06 a.m.