Examples of R functions for fixed precision optimall allocation