R/poiss.R

Defines functions poiss

Documented in poiss

poiss <-
function(xobs, n, s, t, alpha = 0.05)

{
  ns <- n * s
  nst <- ns + t
  prob <- ns / nst

  res <- .C("plBinom", as.integer(xobs), prob, alpha, 
            upper = -1L, lower = -1L, 
            PACKAGE = "plpoisson")[5L:4L]
  return(res)
}

Try the plpoisson package in your browser

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

plpoisson documentation built on May 10, 2022, 1:08 a.m.