R/SRRprop95.R

In Dcroix/RSamplingz: Package for Sampling Needs

Defines functions SRRprop95

Documented in SRRprop95

# This file is part of the RSamplingz package with License GPL-3.0-or-later
SRRprop95 <- function(x,y){
  z <- x/(1 + x*0.0025)
  b <- ceiling(z)
  c <- (y/x)*b
  round(c, digits = 0)
}