model{
   # Likelihood
   k~dbin(theta,N)
   # Posterior Predictive Distribution
   postk~dbin(theta,N)
   # Prior
   theta~dbeta(1,1)
   theta0~dbeta(1,1)
   # Prior Predictive Distribution
   priork~dbin(theta0,N)
}