R/utils-is-odd.R

In andrew-a-hale/emailable.html.table: Emailable HTML Table

Defines functions isOdd

Documented in isOdd

#' Is Odd Test
#'
#' @param x numeric
#'
#' @return
#' @export
#'
#' @examples
#' isOdd(1)
#' isOdd(2)
#' isOdd(1.2)
isOdd <- function(x) {
  x %% 2 == 1
}