R/evicv.R

Defines functions evicv

Documented in evicv

evicv<-function(cv) 
{
  if (sum(cv<=0)!=0)  warning("The function is available for cv>0",call. = TRUE)
  else  (cv^2-1)/(2*cv^2)
}

Try the ercv package in your browser

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

ercv documentation built on Oct. 30, 2019, 9:49 a.m.