R Language
lubricar
Buscar..
Sintaxis
- ymd_hms (..., quiet = FALSE, tz = "UTC", locale = Sys.getlocale ("LC_TIME"))
- ahora (tzone = "")
- intervalo (inicio, final, tzone = attr (inicio, "tzone"))
- duración (num = NULL, unidades = "segundos", ...)
- período (num = NULL, unidades = "segundo", ...)
Observaciones
Para instalar el paquete desde CRAN:
install.packages("lubridate")
Para instalar la versión de desarrollo de Github:
library(devtools)
# dev mode allows testing of development packages in a sandbox, without interfering
# with the other packages you have installed.
dev_mode(on=T)
install_github("hadley/lubridate")
dev_mode(on=F)
Para obtener viñetas en el paquete lubridate:
vignette("lubridate")
Para obtener ayuda sobre alguna función foo :
help(foo) # help about function foo
?foo # same thing
# Example
# help("is.period")
# ?is.period
Para obtener ejemplos para una función foo :
example("foo")
# Example
# example("interval")
Análisis de fechas y fechas de las cadenas con lubricante
El paquete lubridate proporciona funciones prácticas para formatear objetos de fecha y fecha / hora a partir de cadenas de caracteres. Las funciones son permutaciones de
| Carta | Elemento a analizar | Base R equivalente |
|---|---|---|
| y | año | %y , %Y |
| m (con y y d) | mes | %m , %b , %h , %B |
| re | día | %d , %e |
| h | hora | %H , %I%p |
| m (con h y s) | minuto | %M |
| s | segundos | %S |
por ejemplo, ymd() para analizar una fecha con el año seguido del mes seguido por el día, por ejemplo, "2016-07-22" , y ymd_hms() para analizar un datetime en el año, mes, día, horas, minutos segundos, por ejemplo, "2016-07-22 13:04:47" .
Las funciones pueden reconocer la mayoría de los separadores (como / , - y espacios en blanco) sin argumentos adicionales. También trabajan con separadores inconsistentes.
fechas
Las funciones de fecha devuelven un objeto de clase Date .
library(lubridate)
mdy(c(' 07/02/2016 ', '7 / 03 / 2016', ' 7 / 4 / 16 '))
## [1] "2016-07-02" "2016-07-03" "2016-07-04"
ymd(c("20160724","2016/07/23","2016-07-25")) # inconsistent separators
## [1] "2016-07-24" "2016-07-23" "2016-07-25"
Fechas de referencia
Funciones de utilidad
Datetimes se pueden analizar usando ymd_hms variantes incluyendo ymd_hm y ymd_h . Todas las funciones de fecha y hora pueden aceptar un argumento de zona horaria tz similar al de as.POSIXct o strptime , pero el valor predeterminado es "UTC" lugar de la zona horaria local.
Las funciones datetime devuelven un objeto de la clase POSIXct .
x <- c("20160724 130102","2016/07/23 14:02:01","2016-07-25 15:03:00")
ymd_hms(x, tz="EST")
## [1] "2016-07-24 13:01:02 EST" "2016-07-23 14:02:01 EST"
## [3] "2016-07-25 15:03:00 EST"
ymd_hms(x)
## [1] "2016-07-24 13:01:02 UTC" "2016-07-23 14:02:01 UTC"
## [3] "2016-07-25 15:03:00 UTC"
Funciones de analizador
lubridate también incluye tres funciones para analizar tiempos de datos con una cadena de formato como as.POSIXct o strptime :
| Función | Clase de salida | Formato de cadenas aceptadas |
|---|---|---|
parse_date_time | POSIXct | Flexible. Aceptará strptime con % o lubridate datetime el estilo de nombre de función, por ejemplo, "ymd hms" . Aceptará un vector de órdenes para datos heterogéneos y adivinar cuál es el adecuado. |
parse_date_time2 | POSIXct predeterminado; si lt = TRUE , POSIXlt | Estricto. Acepta solo tokens de tiempo de strptime (con o sin % ) de un conjunto limitado. |
fast_strptime | POSIXlt predeterminado; si lt = FALSE , POSIXct | Estricto. Acepta solo tokens de strptime delimitados por % con delimitadores ( - , / , : , etc.) de un conjunto limitado. |
x <- c('2016-07-22 13:04:47', '07/22/2016 1:04:47 pm')
parse_date_time(x, orders = c('mdy Imsp', 'ymd hms'))
## [1] "2016-07-22 13:04:47 UTC" "2016-07-22 13:04:47 UTC"
x <- c('2016-07-22 13:04:47', '2016-07-22 14:47:58')
parse_date_time2(x, orders = 'Ymd HMS')
## [1] "2016-07-22 13:04:47 UTC" "2016-07-22 14:47:58 UTC"
fast_strptime(x, format = '%Y-%m-%d %H:%M:%S')
## [1] "2016-07-22 13:04:47 UTC" "2016-07-22 14:47:58 UTC"
parse_date_time2 y fast_strptime usan un analizador de C rápido para la eficiencia.
Consulte ?parse_date_time para formatear tokens.
Análisis de fecha y hora en lubridate.
Lubridate proporciona ymd() serie de funciones ymd() para analizar cadenas de caracteres en fechas. Las letras y, m y d corresponden a los elementos de año, mes y día de una fecha y hora.
mdy("07-21-2016") # Returns Date
## [1] "2016-07-21"
mdy("07-21-2016", tz = "UTC") # Returns a vector of class POSIXt
## "2016-07-21 UTC"
dmy("21-07-2016") # Returns Date
## [1] "2016-07-21"
dmy(c("21.07.2016", "22.07.2016")) # Returns vector of class Date
## [1] "2016-07-21" "2016-07-22"
Manipulando fecha y hora en lubridate.
date <- now()
date
## "2016-07-22 03:42:35 IST"
year(date)
## 2016
minute(date)
## 42
wday(date, label = T, abbr = T)
# [1] Fri
# Levels: Sun < Mon < Tues < Wed < Thurs < Fri < Sat
day(date) <- 31
## "2016-07-31 03:42:35 IST"
# If an element is set to a larger value than it supports, the difference
# will roll over into the next higher element
day(date) <- 32
## "2016-08-01 03:42:35 IST"
Instantes
Un instante es un momento específico en el tiempo. Cualquier objeto de fecha y hora que se refiere a un momento de tiempo se reconoce como un instante. Para probar si un objeto es un instante, use is.instant .
library(lubridate)
today_start <- dmy_hms("22.07.2016 12:00:00", tz = "IST") # default tz="UTC"
today_start
## [1] "2016-07-22 12:00:00 IST"
is.instant(today_start)
## [1] TRUE
now_dt <- ymd_hms(now(), tz="IST")
now_dt
## [1] "2016-07-22 13:53:09 IST"
is.instant(now_dt)
## [1] TRUE
is.instant("helloworld")
## [1] FALSE
is.instant(60)
## [1] FALSE
Intervalos, duraciones y periodos
Los intervalos son la forma más sencilla de registrar intervalos de tiempo en lubridate. Un intervalo es un lapso de tiempo que se produce entre dos instantes específicos.
# create interval by substracting two instants
today_start <- ymd_hms("2016-07-22 12-00-00", tz="IST")
today_start
## [1] "2016-07-22 12:00:00 IST"
today_end <- ymd_hms("2016-07-22 23-59-59", tz="IST")
today_end
## [1] "2016-07-22 23:59:59 IST"
span <- today_end - today_start
span
## Time difference of 11.99972 hours
as.interval(span, today_start)
## [1] 2016-07-22 12:00:00 IST--2016-07-22 23:59:59 IST
# create interval using interval() function
span <- interval(today_start, today_end)
[1] 2016-07-22 12:00:00 IST--2016-07-22 23:59:59 IST
Las duraciones miden la cantidad exacta de tiempo que ocurre entre dos instantes.
duration(60, "seconds")
## [1] "60s"
duration(2, "minutes")
## [1] "120s (~2 minutes)"
Nota: Las unidades más grandes que las semanas no se utilizan debido a su variabilidad.
Las duraciones se pueden crear utilizando dseconds , dminutes y otras funciones de ayuda de duración.
Ejecutar ?quick_durations para la lista completa.
dseconds(60)
## [1] "60s"
dhours(2)
## [1] "7200s (~2 hours)"
dyears(1)
## [1] "31536000s (~365 days)"
Las duraciones se pueden restar y agregar a instantes para obtener nuevos instantes.
today_start + dhours(5)
## [1] "2016-07-22 17:00:00 IST"
today_start + dhours(5) + dminutes(30) + dseconds(15)
## [1] "2016-07-22 17:30:15 IST"
Se pueden crear duraciones a partir de intervalos.
as.duration(span)
[1] "43199s (~12 hours)"
Los períodos miden el cambio en la hora del reloj que se produce entre dos instantes.
Los períodos se pueden crear utilizando la función de period , así como otras funciones de ayuda, como seconds , hours , etc. Para obtener una lista completa de las funciones de ayuda del período, ?quick_periods Ejecutar ?quick_periods .
period(1, "hour")
## [1] "1H 0M 0S"
hours(1)
## [1] "1H 0M 0S"
period(6, "months")
## [1] "6m 0d 0H 0M 0S"
months(6)
## [1] "6m 0d 0H 0M 0S"
years(1)
## [1] "1y 0m 0d 0H 0M 0S"
is.period función is.period se puede usar para verificar si un objeto es un período.
is.period(years(1))
## [1] TRUE
is.period(dyears(1))
## [1] FALSE
Fechas de redondeo
now_dt <- ymd_hms(now(), tz="IST")
now_dt
## [1] "2016-07-22 13:53:09 IST"
round_date() toma un objeto de fecha y hora y lo redondea al valor entero más cercano de la unidad de tiempo especificada.
round_date(now_dt, "minute")
## [1] "2016-07-22 13:53:00 IST"
round_date(now_dt, "hour")
## [1] "2016-07-22 14:00:00 IST"
round_date(now_dt, "year")
## [1] "2017-01-01 IST"
floor_date() toma un objeto de fecha y hora y lo redondea al valor entero más cercano de la unidad de tiempo especificada.
floor_date(now_dt, "minute")
## [1] "2016-07-22 13:53:00 IST"
floor_date(now_dt, "hour")
## [1] "2016-07-22 13:00:00 IST"
floor_date(now_dt, "year")
## [1] "2016-01-01 IST"
ceiling_date() toma un objeto de fecha y hora y lo redondea al valor entero más cercano de la unidad de tiempo especificada.
ceiling_date(now_dt, "minute")
## [1] "2016-07-22 13:54:00 IST"
ceiling_date(now_dt, "hour")
## [1] "2016-07-22 14:00:00 IST"
ceiling_date(now_dt, "year")
## [1] "2017-01-01 IST"
Diferencia entre periodo y duración.
A diferencia de las duraciones, los períodos se pueden usar para modelar con precisión los tiempos de reloj sin saber cuándo ocurren eventos como segundos de salto, días de salto y cambios de horario de verano.
start_2012 <- ymd_hms("2012-01-01 12:00:00")
## [1] "2012-01-01 12:00:00 UTC"
# period() considers leap year calculations.
start_2012 + period(1, "years")
## [1] "2013-01-01 12:00:00 UTC"
# Here duration() doesn't consider leap year calculations.
start_2012 + duration(1)
## [1] "2012-12-31 12:00:00 UTC"
Zonas horarias
with_tz devuelve una fecha y hora como aparecería en una zona horaria diferente.
nyc_time <- now("America/New_York")
nyc_time
## [1] "2016-07-22 05:49:08 EDT"
# corresponding Europe/Moscow time
with_tz(nyc_time, tzone = "Europe/Moscow")
## [1] "2016-07-22 12:49:08 MSK"
force_tz devuelve una fecha y hora que tiene la misma hora que x en la nueva zona horaria.
nyc_time <- now("America/New_York")
nyc_time
## [1] "2016-07-22 05:49:08 EDT"
force_tz(nyc_time, tzone = "Europe/Moscow") # only timezone changes
## [1] "2016-07-22 05:49:08 MSK"
