R/sim.linearpopn.R

############################################################################################
## package 'secrlinear'
## sim.linearpopn.R
## last changed 2014-08-29, 2014-09-03
############################################################################################

sim.linearpopn <- 	function (mask, D, N, Ndist = c('poisson', 'fixed'), ...) {
    Ndist <- match.arg(Ndist)
    if (!inherits(mask, 'linearmask'))
        stop ("requires linearmask")
    if (missing(D)) {
        D <- rep(N / masklength(mask), nrow(mask))
    }
    sim.popn(core = mask, D = D, model2D = "linear", Ndist = Ndist, ...)
}

Try the secrlinear package in your browser

Any scripts or data that you put into this service are public.

secrlinear documentation built on Oct. 17, 2023, 9:07 a.m.