R/L.R

L <- function(x, g.hat, d.hat) {
    prod(dnorm(x, g.hat, sqrt(d.hat)))
}
yufree/xMSanalyzer documentation built on May 4, 2019, 6:35 p.m.