R/halft1.mle.R

In foldedt: The Folded t Family of Distributions

Defines functions halft1.mle

Documented in halft1.mle

halft1.mle <- function(x, tol = 1e-7) {
  mod <- Rfast::ct.mle(x, tol = tol)
  mod$loglik <- mod$loglik + length(x) * log(2)
  mod
}

Try the foldedt package in your browser