model { for (i in 1:N.sample) { Y[i] ~ dbin(p, n) } p ~ dbeta(0.5, 0.5) n <- Ymax + m m ~ dnegbin(0.5, 10) }
p
n