R/mround.R

In aurielfournier/rel: auriels_stuff

#' Rounds numbers into categories by dec
#'
#' 
#' @param a number that you want to round to a dec (decimal)
#' @keywords rounding
#' @export
#' @examples
#' mround()


mround <- function(x,dec){ dec*round(x/dec) }