R/statistics_simple.R

sir <- function(d, n, pop){
    (sum(d[[pop]])/sum(d[[n]])) * d[[n]]/d[[pop]]
}
barryrowlingson/phlabr documentation built on May 3, 2019, 9:37 p.m.