diff --git a/R/core_commons.R b/R/core_commons.R
index e869dd3eb09f953492b607a86f9d1b17289265a6..70bbbbac821cdc4428f917a34ecf8dd97aeb8b13 100644
--- a/R/core_commons.R
+++ b/R/core_commons.R
@@ -545,6 +545,9 @@ trim_outliers <- function(values, probs=c(0.05, 0.95)){
 
 se <- function(x) sd(x, na.rm = TRUE) / sqrt(sum(! is.na(x)))
 
+# https://stackoverflow.com/questions/43627679/round-any-equivalent-for-dplyr/46489816#46489816
+round_any = function(x, accuracy, f=round){f(x/ accuracy) * accuracy}
+
 
 ########################################################################################################################
 ### Misc