R/dnormR.R

Defines functions dnormR

dnormR <- function(x, mu=0, s=1, log. = FALSE)  {

   out <- -(log(2*pi*s*s) + ((x - mu)/s)^2)/2
   ifelse(log., out, exp(out))
   }
   

   
  
   
John-R-Wallace/R-ToolBox documentation built on April 22, 2024, 8:29 p.m.