R/round_num.R

In hmorzaria/pssalmonsurvival: Sensitivity analysis of salmon survival in Puget Sound

#' round_num
#'
#' @param x
#' @param accuracy
#' @param roundto
#'
#' @return
#' @export
#'
#' @examples

round_num <- function(thisnumber, accuracy, f=round){

  newthisnumber= f(thisnumber/ accuracy) * accuracy
  return (newthisnumber)
  }