Bernoulli … again.
Let \(y_1, ..., y_n | \theta \sim \text{Bern}(\theta)\), and assume that you have obtained a sample with \(s = 5\) successes in \(n = 20\) trials.

A demo R package that contains only two functions euclidean() and dijkstra().