date_leap_year {clock}

Is the year a leap year?

Description

date_leap_year() detects if the year is a leap year.

Usage

date_leap_year(x)

Arguments

x

⁠[Date / POSIXct / POSIXlt]⁠

A date or date-time to detect leap years in.

Value

A logical vector the same size as x. Returns TRUE if in a leap year, FALSE if not in a leap year, and NA if x is NA.

Examples

x <- as.Date("2019-01-01")
x <- add_years(x, 0:5)
date_leap_year(x)

y <- as.POSIXct("2019-01-01", "America/New_York")
y <- add_years(y, 0:5)
date_leap_year(y)