model {

   # likelihood
   k ~ dbin(p, n)

   # prior
   p ~ dbeta(nu, omega)

}

# MN allele counts from Table 2.3 (p. 44)
list(k = 201, n = 372, nu = 1, omega = 1)