R Language
Дата и время
Поиск…
Вступление
R поставляется с классами для дат, расписаний даты и времени; см. « ?Dates
, « ?DateTimeClasses
, « ?difftime
и следуйте разделу «См. также» этих документов для дальнейшей документации. Связанные документы: даты и классы времени .
замечания
Классы
Класс даты, POSIXct хранит время в секундах с эпохи UNIX в
1970-01-01 00:00:00 UTC
. Это формат, возвращаемый приSys.Time()
текущего времени с помощьюSys.Time()
.Класс даты и времени хранит список дней, месяца, года, часа, минуты, секунды и т. Д. Это формат, возвращаемый
strptime
.Дата Единственный класс даты сохраняет дату как число с плавающей запятой.
Выбор формата даты и времени
POSIXct - единственная опция в tidyverse и мире UNIX. Это быстрее и занимает меньше памяти, чем POSIXlt.
origin = as.POSIXct("1970-01-01 00:00:00", format ="%Y-%m-%d %H:%M:%S", tz = "UTC")
origin
## [1] "1970-01-01 UTC"
origin + 47
## [1] "1970-01-01 00:00:47 UTC"
as.numeric(origin) # At epoch
## 0
as.numeric(Sys.time()) # Right now (output as of July 21, 2016 at 11:47:37 EDT)
## 1469116057
posixlt = as.POSIXlt(Sys.time(), format ="%Y-%m-%d %H:%M:%S", tz = "America/Chicago")
# Conversion to POISXct
posixct = as.POSIXct(posixlt)
posixct
# Accessing components
posixlt$sec # Seconds 0-61
posixlt$min # Minutes 0-59
posixlt$hour # Hour 0-23
posixlt$mday # Day of the Month 1-31
posixlt$mon # Months after the first of the year 0-11
posixlt$year # Years since 1900.
ct = as.POSIXct("2015-05-25")
lt = as.POSIXlt("2015-05-25")
object.size(ct)
# 520 bytes
object.size(lt)
# 1816 bytes
Специализированные пакеты
- в любой момент
- data.table IDate и ITime
- fasttime
- lubridate
- nanotime
Текущая дата и время
R имеет доступ к текущей дате, времени и часовому поясу:
Sys.Date() # Returns date as a Date object
## [1] "2016-07-21"
Sys.time() # Returns date & time at current locale as a POSIXct object
## [1] "2016-07-21 10:04:39 CDT"
as.numeric(Sys.time()) # Seconds from UNIX Epoch (1970-01-01 00:00:00 UTC)
## [1] 1469113479
Sys.timezone() # Time zone at current location
## [1] "Australia/Melbourne"
Используйте OlsonNames()
для просмотра имен часовых поясов в базе данных Olson / IANA в текущей системе:
str(OlsonNames())
## chr [1:589] "Africa/Abidjan" "Africa/Accra" "Africa/Addis_Ababa" "Africa/Algiers" "Africa/Asmara" "Africa/Asmera" "Africa/Bamako" ...
Перейти к концу месяца
Предположим, мы хотим перейти в последний день месяца, эта функция поможет:
eom <- function(x, p=as.POSIXlt(x)) as.Date(modifyList(p, list(mon=p$mon + 1, mday=0)))
Тестовое задание:
x <- seq(as.POSIXct("2000-12-10"),as.POSIXct("2001-05-10"),by="months")
> data.frame(before=x,after=eom(x))
before after
1 2000-12-10 2000-12-31
2 2001-01-10 2001-01-31
3 2001-02-10 2001-02-28
4 2001-03-10 2001-03-31
5 2001-04-10 2001-04-30
6 2001-05-10 2001-05-31
>
Использование даты в строчном формате:
> eom('2000-01-01')
[1] "2000-01-31"
Перейти в первый день месяца
Предположим, мы хотим отправиться в первый день месяца:
date <- as.Date("2017-01-20")
> as.POSIXlt(cut(date, "month"))
[1] "2017-01-01 EST"
Перемещать дату на несколько месяцев последовательно по месяцам
Допустим, мы хотим , чтобы переместить заданную дату num
месяцев. Мы можем определить следующую функцию, которая использует пакет mondate
:
moveNumOfMonths <- function(date, num) {
as.Date(mondate(date) + num)
}
Он последовательно перемещает месячную часть даты и корректирует день, если дата относится к последнему дню месяца.
Например:
Назад один месяц:
> moveNumOfMonths("2017-10-30",-1)
[1] "2017-09-30"
Назад два месяца:
> moveNumOfMonths("2017-10-30",-2)
[1] "2017-08-30"
Переслать два месяца:
> moveNumOfMonths("2017-02-28", 2)
[1] "2017-04-30"
Он движется два месяца с последнего дня февраля, поэтому последний день апреля.
Давайте посмотрим, как это работает для операций назад и вперед, когда это последний день месяца:
> moveNumOfMonths("2016-11-30", 2)
[1] "2017-01-31"
> moveNumOfMonths("2017-01-31", -2)
[1] "2016-11-30"
Поскольку ноябрь имеет 30 дней, мы получаем одну и ту же дату в обратной операции, но:
> moveNumOfMonths("2017-01-30", -2)
[1] "2016-11-30"
> moveNumOfMonths("2016-11-30", 2)
[1] "2017-01-31"
Поскольку январь имеет 31 день, то переход на два месяца с последнего дня ноября будет последним днем января.