#' Rounding of Numbers
#'
#' R “rounds to even” when rounding off a 5. This formula rounds numbers ending in .5 up ("rounding in commerce").
#' This formula is based on http://alandgraf.blogspot.com/2012/06/rounding-in-r.html
#' @param x a numeric vector
#' @param digits integer indicating the number of decimal places
#' @export
round2 = function(x, digits = 1) {
posneg = sign(x)
z = abs(x)*10^digits
z = z + 0.5
z = trunc(z)
z = z/10^digits
z * posneg
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.