R/vero.R

Defines functions vero

Documented in vero

vero <- function(y, mu, sigma2, grados){
  l <- prod((gamma((grados+1)/2)/(gamma(1/2)*gamma(grados/2)*(grados*sigma2)^0.5))*(1+(y-mu)^2/(sigma2*grados))^(-(grados+1)/2))
  l <- log(l)
  return(l)
}

Try the Bayesiantreg package in your browser

Any scripts or data that you put into this service are public.

Bayesiantreg documentation built on May 29, 2024, 6:44 a.m.