R/check_bins_ascend.R

In cdcepi/predx: Tools for working with predictions

Defines functions check_bins_ascend

Documented in check_bins_ascend

#' Title
#'
#' @param bins
#'
#' @return  TRUE or error message
#'
check_bins_ascend <- function(bins) {
  if (all(diff(bins) > 0)) TRUE
  else "the bins are not in ascending order"
}