R/prior_d.R

Defines functions prior_d

prior_d <- function(k) {
  return(0.5 * (p(.k = k-1) - p(.k = k)))
} #prior in RJMCMC ratio for a death step
aashen12/BARS documentation built on Aug. 21, 2020, 2:44 p.m.