simple Bayesian version of R's prop.test