Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Branch: master
Fetching contributors…

Cannot retrieve contributors at this time

14 lines (13 sloc) 0.318 kB
#' Does date time occur in the am or pm?
#'
#' @export am pm
#' @aliases am pm
#' @param x a date-time object
#' @return TRUE or FALSE depending on whethe x occurs in the am or pm
#' @keywords chron
#' @examples
#' x <- ymd("2012-03-26")
#' am(x)
#' pm(x)
am <- function(x) hour(x) < 12
pm <- function(x) !am(x)
Jump to Line
Something went wrong with that request. Please try again.