powered by
two_p_update(prior, y1n1, y2n2)
prior <- testing_prior() two_p_update(prior, c(3, 10), c(8, 20))
Run the code above in your browser using DataLab