R/A1FirstDerivative.R

In apjmason/circular: Circular Statistics

Defines functions A1FirstDerivative

Documented in A1FirstDerivative

A1FirstDerivative <- function(kappa) {
  result <- 1-(A1(kappa=kappa)/kappa)-A1(kappa=kappa)^2
  return(result)
}