msa.postprocess.ev.number.discrimination.ratio.simple <- function(
component.variance.total,
component.variance.gage.r.r
) {
sqrt((2*component.variance.total/component.variance.gage.r.r) - 1)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.