https://github.com/cran/IQCC
Raw File
Tip revision: 5c6e6dea621fd5b486441c5e649098ad5a6549e6 authored by Flavio Barros on 15 November 2017, 21:16:12 UTC
version 0.7
Tip revision: 5c6e6de
c4.R
#' C4 Constant.
#' 
#' This function is used to calculate the bias correction constant c4 for the
#' sample standard deviation statistic.
#' 
#' It is used to correct the bias for small sample sizes in the sample standard
#' deviation statistic.
#' 
#' @param n The sample size.
#' @return Return the value of c4 for a given sample size n.
#' @export
#' @author Daniela R. Recchia, Emanuel P. Barbosa
#' @seealso \link{d2},\link{d3}
#' @examples
#' 
#' c4(5)
#' 
c4 <- function(n)
{
    c <- (sqrt(2 / (n-1))) * (gamma(n/2) / gamma((n-1) / 2))
    return(c)
}
back to top