R/pgenpois.R

pgenpois <-
function(q, lambda1, lambda2)
{
  foo <- 0
  for (i in 0:q) 
  {
    foo <- foo + dgenpois(i, lambda1 = lambda1, lambda2 = lambda2)
  }
return(foo)
}

Try the HMMpa package in your browser

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

HMMpa documentation built on May 2, 2019, 7:58 a.m.