Round + Preserve the Sum

Source: R/round_preserve_sum.R

  1. Round down to the specified number of decimal places

  2. Order numbers by their remainder values

  3. Increment the specified decimal place of values with ‘k’ largest remainders, where ‘k’ is the number of values that must be incremented to preserve their rounded sum

round_preserve_sum(x, digits = 4)

Arguments

x

A numeric vector to apply the algorithm to. This should be a proportion vector where all values equal 1.
digits

A numeric. Indicates the number of decimal places to be used.

References

https://www.r-bloggers.com/2016/07/round-values-while-preserve-their-rounded-sum-in-r/

Examples

sum(c(0.333, 0.333, 0.334))

#> [1] 1

sum(round(c(0.333, 0.333, 0.334), 2))

#> [1] 0.99

sum(round_preserve_sum(c(0.333, 0.333, 0.334), 2))

#> [1] 1