# This file is part of the RSamplingz package with License GPL-3.0-or-later
SRRequal95 <- function(x, y){
z <- x/(1 + x*0.0025)
a <- ceiling(z)
b <- a/y
ceiling(b)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.