| Title: | Date and Time Extensions for the 'rebus' Package |
|---|---|
| Description: | Build regular expressions piece by piece using human readable code. This package contains date and time functionality, and is primarily intended to be used by package developers. |
| Authors: | Richard Cotton [aut, cre] |
| Maintainer: | Richard Cotton <[email protected]> |
| License: | Unlimited |
| Version: | 0.0-2 |
| Built: | 2024-11-04 03:32:57 UTC |
| Source: | https://github.com/richierocks/rebus.datetimes |
Get the names of the days of the week in a given locale.
get_weekdays(abbreviate = FALSE, locale = NULL, from = Sys.Date()) get_months(abbreviate = FALSE, locale = NULL, from = Sys.Date())get_weekdays(abbreviate = FALSE, locale = NULL, from = Sys.Date()) get_months(abbreviate = FALSE, locale = NULL, from = Sys.Date())
abbreviate |
A logical value indicating whether or not to return abbreviated names (if they are available). |
locale |
A string denoting the name of the locale to retrieve names in,
or |
from |
Date to use for the first day/month. |
A string containing a regular expression of the names of the days of the week, separated by pipes. The first day of the week will be the current day.
See Sys.setlocale and
http://stackoverflow.com/q/20960821/134830 and
http://stackoverflow.com/q/26603564/134830 for how to specify
the locale.
get_weekdays() get_weekdays(TRUE) get_months() get_months(TRUE) ## Not run: if(.Platform$OS.type == "windows") { get_weekdays(locale = "French_France") get_weekdays(TRUE, locale = "French_France") get_weekdays(locale = "Arabic_Qatar") get_weekdays(TRUE, locale = "Arabic_Qatar") } else { get_weekdays(locale = "fr_FR.utf8") get_weekdays(TRUE, locale = "fr_FR.utf8") get_weekdays(locale = "ar_QA.utf8") get_weekdays(TRUE, locale = "ar_QA.utf8") } ## End(Not run)get_weekdays() get_weekdays(TRUE) get_months() get_months(TRUE) ## Not run: if(.Platform$OS.type == "windows") { get_weekdays(locale = "French_France") get_weekdays(TRUE, locale = "French_France") get_weekdays(locale = "Arabic_Qatar") get_weekdays(TRUE, locale = "Arabic_Qatar") } else { get_weekdays(locale = "fr_FR.utf8") get_weekdays(TRUE, locale = "fr_FR.utf8") get_weekdays(locale = "ar_QA.utf8") get_weekdays(TRUE, locale = "ar_QA.utf8") } ## End(Not run)
Match ISO 8601 date and time classes.
iso_date(lo, hi, char_class = TRUE) iso_time(lo, hi, char_class = TRUE) iso_datetime(lo, hi, char_class = TRUE)iso_date(lo, hi, char_class = TRUE) iso_time(lo, hi, char_class = TRUE) iso_datetime(lo, hi, char_class = TRUE)
lo |
A non-negative integer. Minimum number of repeats, when grouped. |
hi |
positive integer. Maximum number of repeats, when grouped. |
char_class |
|
A character vector representing part or all of a regular expression.
http://www.iso.org/iso/iso8601
iso_date() iso_time() iso_datetime() # With repetition iso_date(3, 6) iso_time(1, Inf) iso_datetime(0, Inf) # Without a class wrapper iso_date(char_class = FALSE)iso_date() iso_time() iso_datetime() # With repetition iso_date(3, 6) iso_time(1, Inf) iso_datetime(0, Inf) # Without a class wrapper iso_date(char_class = FALSE)
Compound regex constants for matching ISO 8601 dates and times.
OPT_LEADING_0 DTSEP CENTURY CENTURY_IN YEAR YEAR2 YEAR4 MONTH MONTH_IN WEEK_OF_YEAR WEEK_OF_YEAR_IN DAY DAY_IN DAY_SINGLE DAY_OF_YEAR DAY_OF_YEAR_IN WEEKDAY1 WEEKDAY0 HOUR24 HOUR24_SINGLE HOUR24_IN HOUR12 HOUR12_SINGLE HOUR12_IN MINUTE MINUTE_IN SECOND SECOND_IN FRACTIONAL_SECOND FRACTIONAL_SECOND_IN AM_PM TIMEZONE_OFFSET TIMEZONE ISO_DATE ISO_DATE_IN ISO_TIME ISO_TIME_IN ISO_DATETIME ISO_DATETIME_IN YMD YMD_IN YDM YDM_IN MYD MYD_IN MDY MDY_IN DYM DYM_IN DMY DMY_IN HMS HMS_IN HM HM_IN MS MS_IN datetime(x, locale = NULL, io = c("output", "input"))OPT_LEADING_0 DTSEP CENTURY CENTURY_IN YEAR YEAR2 YEAR4 MONTH MONTH_IN WEEK_OF_YEAR WEEK_OF_YEAR_IN DAY DAY_IN DAY_SINGLE DAY_OF_YEAR DAY_OF_YEAR_IN WEEKDAY1 WEEKDAY0 HOUR24 HOUR24_SINGLE HOUR24_IN HOUR12 HOUR12_SINGLE HOUR12_IN MINUTE MINUTE_IN SECOND SECOND_IN FRACTIONAL_SECOND FRACTIONAL_SECOND_IN AM_PM TIMEZONE_OFFSET TIMEZONE ISO_DATE ISO_DATE_IN ISO_TIME ISO_TIME_IN ISO_DATETIME ISO_DATETIME_IN YMD YMD_IN YDM YDM_IN MYD MYD_IN MDY MDY_IN DYM DYM_IN DMY DMY_IN HMS HMS_IN HM HM_IN MS MS_IN datetime(x, locale = NULL, io = c("output", "input"))
x |
A |
locale |
A string specifying a locale. |
io |
Are you trying to match output or input? The latter is less strict about leading zeroes and spaces. |
An object of class character of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
An object of class regex (inherits from character) of length 1.
A character vector representing part or all of a regular expression.
"%O[dHImMUVwWy]", "%E[cCyYxX]", "%x", "%X"
and "%+" are supposed to be locale-dependent upon output,
but implementing this in an OS-portable way seems to be much more effort
than it's worth.
strptime that describes formatting codes,
ClassGroups, Sys.setlocale
datetime("%m/%d/%Y") # match US style dates twelve_or_twentyfour <- rebus.base::or("%H", "%I%p") datetime(twelve_or_twentyfour) # match hours in 24h or 12h format ## Not run: # week days and months can be matched in any locale if(.Platform$OS.type == "windows") { fr_FR <- "French_France" ar_QA <- "Arabic_Qatar" } else if(Sys.info()["sysname"] != "Darwin") # mac { fr_FR <- "fr_FR" ar_QA <- "ar_QA" } else if(Sys.info()["sysname"] != "Linux") { fr_FR <- "fr_FR.utf8" ar_QA <- "ar_QA.utf8" } datetime("%a %A %b %B", fr_FR) datetime("%a %A %b %B", ar_QA) # All letter tokens. Lots of output. x <- paste0("%", c(letters, LETTERS)) stats::setNames(datetime(x), x) ## End(Not run) # Individual date-time components DTSEP # optional selected punctuation or space CENTURY # exactly two digits YEAR # one to four digits YEAR2 # exactly two digits YEAR4 # exactly four digits MONTH # number from 1 to 12, leading zero WEEK_OF_YEAR # number from 0 to 53, leading zero DAY # number from 1 to 31, leading zero DAY_SINGLE # leading space HOUR24 # 24 hour clock, leading zero HOUR12 # 12 hour clock, leading zero HOUR24_SINGLE # 24 hour clock, leading space HOUR12_SINGLE # 12 hour clock, leading space MINUTE # number from 0 to 59, leading zero SECOND # number from 0 to 61 (leap seconds), leading zero FRACTIONAL_SECOND # a second optional decimal point and up to 6 digits AM_PM # AM or PM, any case TIMEZONE_OFFSET # optional plus or minus, then four digits TIMEZONE # Any value returned by OlsonNames() # ISO 8601 formats ISO_DATE # %Y-%m-%d ISO_TIME # %H:%M:%S ISO_DATETIME # ISO_DATE followed by ISO_TIME, separated by space or "T". # Compound forms, separated by DTSEP YMD YDM MYD MDY DYM DMY HMS HM MS # Some forms have less strict alternatives for input (with an '_IN' suffix). CENTURY_IN MONTH_IN WEEK_OF_YEAR_IN DAY_IN HOUR24_IN HOUR12_IN MINUTE_IN SECOND_IN FRACTIONAL_SECOND_IN ISO_DATE_IN ISO_TIME_IN ISO_DATETIME_IN YMD_IN YDM_IN MYD_IN MDY_IN DYM_IN DMY_IN HMS_IN HM_IN MS_IN dates <- seq(as.Date("2000-01-01"), as.Date("2001-01-01"), "1 day") datetimes <- seq(as.POSIXct(Sys.Date()), as.POSIXct(Sys.Date() + 1), "1 sec") times <- substring(format(datetimes), 12, 19) stopifnot( all(grepl(ISO_DATE, dates)), all(grepl(ISO_TIME, times)), all(grepl(ISO_DATETIME, datetimes)) ) non_dates <- c( "2000-13-01", "2000-01-32", "2000-00-01", "2000-01-00" ) non_times <- c( "24:00:00", "23:60:59", "23:59:62", "23 59 59" ) stopifnot( all(!grepl(ISO_DATE, non_dates)), all(!grepl(ISO_TIME, non_times)) )datetime("%m/%d/%Y") # match US style dates twelve_or_twentyfour <- rebus.base::or("%H", "%I%p") datetime(twelve_or_twentyfour) # match hours in 24h or 12h format ## Not run: # week days and months can be matched in any locale if(.Platform$OS.type == "windows") { fr_FR <- "French_France" ar_QA <- "Arabic_Qatar" } else if(Sys.info()["sysname"] != "Darwin") # mac { fr_FR <- "fr_FR" ar_QA <- "ar_QA" } else if(Sys.info()["sysname"] != "Linux") { fr_FR <- "fr_FR.utf8" ar_QA <- "ar_QA.utf8" } datetime("%a %A %b %B", fr_FR) datetime("%a %A %b %B", ar_QA) # All letter tokens. Lots of output. x <- paste0("%", c(letters, LETTERS)) stats::setNames(datetime(x), x) ## End(Not run) # Individual date-time components DTSEP # optional selected punctuation or space CENTURY # exactly two digits YEAR # one to four digits YEAR2 # exactly two digits YEAR4 # exactly four digits MONTH # number from 1 to 12, leading zero WEEK_OF_YEAR # number from 0 to 53, leading zero DAY # number from 1 to 31, leading zero DAY_SINGLE # leading space HOUR24 # 24 hour clock, leading zero HOUR12 # 12 hour clock, leading zero HOUR24_SINGLE # 24 hour clock, leading space HOUR12_SINGLE # 12 hour clock, leading space MINUTE # number from 0 to 59, leading zero SECOND # number from 0 to 61 (leap seconds), leading zero FRACTIONAL_SECOND # a second optional decimal point and up to 6 digits AM_PM # AM or PM, any case TIMEZONE_OFFSET # optional plus or minus, then four digits TIMEZONE # Any value returned by OlsonNames() # ISO 8601 formats ISO_DATE # %Y-%m-%d ISO_TIME # %H:%M:%S ISO_DATETIME # ISO_DATE followed by ISO_TIME, separated by space or "T". # Compound forms, separated by DTSEP YMD YDM MYD MDY DYM DMY HMS HM MS # Some forms have less strict alternatives for input (with an '_IN' suffix). CENTURY_IN MONTH_IN WEEK_OF_YEAR_IN DAY_IN HOUR24_IN HOUR12_IN MINUTE_IN SECOND_IN FRACTIONAL_SECOND_IN ISO_DATE_IN ISO_TIME_IN ISO_DATETIME_IN YMD_IN YDM_IN MYD_IN MDY_IN DYM_IN DMY_IN HMS_IN HM_IN MS_IN dates <- seq(as.Date("2000-01-01"), as.Date("2001-01-01"), "1 day") datetimes <- seq(as.POSIXct(Sys.Date()), as.POSIXct(Sys.Date() + 1), "1 sec") times <- substring(format(datetimes), 12, 19) stopifnot( all(grepl(ISO_DATE, dates)), all(grepl(ISO_TIME, times)), all(grepl(ISO_DATETIME, datetimes)) ) non_dates <- c( "2000-13-01", "2000-01-32", "2000-00-01", "2000-01-00" ) non_times <- c( "24:00:00", "23:60:59", "23:59:62", "23 59 59" ) stopifnot( all(!grepl(ISO_DATE, non_dates)), all(!grepl(ISO_TIME, non_times)) )