powered by
ExponentialPrior(u, rate)
samples <- ExponentialPrior(runif(100), 5) summary(samples)
Run the code above in your browser using DataLab