Nothing
#' Distribution function half Cauchy
#'
#' Computes the cdf.
#'
#' For internal use
#'
#' @keywords internal
#' @examples
#'
#' ## The function is currently defined as
#' function(q, location = 0, scale = 1) {
#' ifelse(x < 0, 0, 1) * (pcauchy(q, location, scale) - pcauchy(
#' 0,
#' location, scale
#' )) / (1 - pcauchy(0, location, scale))
#' }
phalfcauchy <-
function(q, location = 0, scale = 1) {
ifelse(q < 0, 0, 1) * (pcauchy(q, location, scale) - pcauchy(
0,
location, scale
)) / (1 - pcauchy(0, location, scale))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.