R/quadroot.R
In Auburngrads/SMRD: Statistical Methods For Reliability Data
quadroot <-
function (a, b, c)
{
discrim <- b^2 - 4 * a * c
if (discrim < 0) {
stop("neg discrim")
}
return((-b + sqrt(discrim))/(2 * a))
}
Auburngrads/SMRD documentation built on Sept. 14, 2020, 2:21 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
quadroot <-
function (a, b, c)
{
discrim <- b^2 - 4 * a * c
if (discrim < 0) {
stop("neg discrim")
}
return((-b + sqrt(discrim))/(2 * a))
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.