R/pcircexp.R

Defines functions pcircexp

Documented in pcircexp

pcircexp <- function(u, lambda, rads = FALSE) {
  if ( !rads )  u <- u * pi / 180
  ( 1 - exp(-lambda * u) ) / ( 1 - exp(-2 * pi * lambda) )
}

Try the Directional package in your browser

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

Directional documentation built on Oct. 12, 2023, 1:07 a.m.