R/normalPDFplot.R
normalPDFplot <- function(mean, sdev, xpar) {
prob <- (1/(sqrt(2*pi)*sdev))*(exp(-1*((xpar-mean)^2/(2*sdev^2))))
plot(xpar, prob, type="l")
}
normalPDFplot <- function(mean, sdev, xpar) {
prob <- (1/(sqrt(2*pi)*sdev))*(exp(-1*((xpar-mean)^2/(2*sdev^2))))
plot(xpar, prob, type="l")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.
