R/dtanb.R

In TrigonometricDistribution/TanB: The TanB Distribution

#' The density function of the Tangent Burr Type XII probability distribution.
#' @export
#' @importFrom pracma sec
#'
#' @param x vector of quantiles.
#' @param c C parameter.
#' @param k K parameter.
#' @param s S parameter.
#' @return A vector with n observations of the Tangent Burr Type XII distribution.
#' @examples
#' dtanb(0.5,32.5,3,3.5)
#' dtanb(0.5,2,3,3)
#' @family Basic functions for the Tangent-Burr Type XII distribution

dtanb <- function(x, c, k, s) {
    (pi/4) * (c * k * x^(c - 1) * s^(-c) * (1 + (x/s)^c)^(-k - 1)) * sec((pi/4) * (1 - (1 + (x/s)^c)^(-k)))^2
}