R/lognorm.R

Defines functions lognormal

lognormal <- function(data, sig)
{
  n=length(data)
  #ret = -n*log(pi)/2 -n*log(var(data))/2 - n/2
  ret =  -(sum( (data-mean(data) )^2 ))/(sig)
  return(ret)
}

Try the hbiclust package in your browser

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

hbiclust documentation built on May 2, 2019, 4:56 p.m.