프로그래밍 언어로 현재 날짜를 가져옵니다. 이는 "Hello world!"와 동일한 작업입니다. R 언어도 예외는 아닙니다.

이 기사에서는 R 언어의 기본 구문에서 날짜 작업이 어떻게 작동하는지 살펴보고 날짜 작업 시 기능을 확장하는 몇 가지 유용한 패키지도 살펴보겠습니다.

• lubridate — 날짜 간 산술 계산을 수행할 수 있는 패키지입니다.
• timeperiodsR — 시간 간격 및 해당 구성 요소를 다루는 패키지입니다.

내용

데이터 분석, 특히 R 언어에 관심이 있다면 내 글에 관심이 있을 것입니다. 전보 и 유튜브 채널. 대부분의 콘텐츠는 R 언어에 전념합니다.

1. 기본 R 구문의 날짜 작업
   1.1. 텍스트를 날짜로 변환
   1.2. 기본 R에서 날짜 구성 요소 추출
2. lubridate 패키지를 사용하여 날짜 작업
   2.1. lubridate를 사용하여 텍스트를 날짜로 변환
   2.2. lubridate 패키지를 사용하여 날짜 구성 요소 추출
   2.3. 날짜를 사용한 산술 연산
3. 기간, 기간, R 패키지를 사용한 단순화된 작업
   3.1. 기간R의 시간 간격
   3.2. timePeriodsR을 사용하여 날짜 벡터 필터링
4. 결론

기본 R 구문의 날짜 작업

텍스트를 날짜로 변환

기본 R에는 날짜 작업을 위한 일련의 함수가 있습니다. 기본 구문의 단점은 함수 이름과 인수의 대소문자가 매우 분산되어 있고 실제로 논리적 연결이 없다는 것입니다. 그러나 언어의 기본 기능을 알아야 하므로 먼저 시작하겠습니다.

csv 파일 또는 기타 소스에서 R로 데이터를 로드할 때 날짜를 텍스트로 받는 경우가 가장 많습니다. 이 텍스트를 올바른 데이터 유형으로 변환하려면 다음 함수를 사용하십시오. as.Date().

# создаём текстовый вектор с датами
my_dates <- c("2019-09-01", "2019-09-10", "2019-09-23")

# проверяем тип данных
class(my_dates)

#> [1] "character"

# преобразуем текст в дату
my_dates <- as.Date(my_dates)

# проверяем тип данных
class(my_dates)

#> [1] "Date"

기본적으로 as.Date() 두 가지 형식의 날짜를 허용합니다. YYYY-MM-DD 또는 YYYY/MM/DD.
데이터 세트에 다른 형식의 날짜가 포함되어 있는 경우 인수를 사용할 수 있습니다. format.

as.Date("September 26, 2019", format = "%B %d, %Y")

체재 시간 간격과 해당 형식을 나타내는 문자열 형식의 연산자를 허용하며 가장 일반적으로 사용되는 값은 아래 표에 나와 있습니다.

체재
기술

%d
월의 일 수

%a
요일 이름의 약어

%A
요일의 전체 이름

%w
요일 번호(0-6, 여기서 0은 일요일)

%m
두 자리 월 지정(01-12)

%b
월 이름의 약어(apr, mar, ...)

%B
전체 월 이름

%y
두 자리 연도 지정

%Y
XNUMX자리 연도 지정

%j
해당 연도의 일 수(001 - 366)

%U
해당 연도의 주 번호(00 - 53), 주의 시작 일요일

%W
해당 연도의 주 번호(00 - 53), 주의 시작 월요일

따라서 "26년 2019월 XNUMX일"은 월, 일, 연도의 전체 이름입니다. 이 날짜 형식은 다음과 같이 연산자를 사용하여 설명할 수 있습니다."%B %d, %Y".

장소 :

• %B — 달의 전체 이름
• %d — 해당 월의 일수
• %Y — XNUMX자리 연도 지정

날짜 형식을 설명할 때 대시, 쉼표, 마침표, 공백 등과 같은 문자열의 모든 추가 문자를 포함하는 것이 중요합니다. 내 예인 "26년 2019월 XNUMX일"에서는 날짜 뒤에 쉼표가 있고 형식 설명에도 쉼표를 넣어야 합니다."%B %d, %Y".

표준 형식과 일치하지 않을 뿐만 아니라 날짜를 받는 상황이 있습니다. (YYYY-MM-DD 또는 YYYY/MM/DD)이지만 운영 체제에 설치된 기본 언어와 다른 언어로도 작성됩니다. 예를 들어 '15년 2019월 XNUMX일'과 같이 날짜가 표시된 데이터를 다운로드했습니다. 이 문자열을 날짜로 변환하기 전에 로케일을 변경해야 합니다.

# Меняем локаль
Sys.setlocale("LC_TIME", "Russian")
# Конвертируем строку в дату
as.Date("Декабрь 15, 2019 г.", format = "%B %d, %Y")

기본 R에서 날짜 구성 요소 추출

기본 R에는 클래스 객체에서 날짜의 일부를 추출할 수 있는 함수가 많지 않습니다. 날짜.

current_date <- Sys.Date() # текущая дата
weekdays(current_date)     # получить номер дня недели
months(current_date)       # получить номер месяца в году
quarters(current_date)     # получить номер квартала в году

주요 객체 클래스 외에도 날짜 기본 R에는 타임스탬프를 저장하는 데이터 유형이 2개 더 있습니다. POSIXlt, POSIXct. 이 클래스와 클래스의 주요 차이점은 날짜 날짜 외에 시간도 저장한다는 것입니다.

# получить текущую дату и время
current_time <- Sys.time()

# узнать класс объекта current_time 
class(current_time)

# "POSIXct" "POSIXt"

기능 Sys.time() 현재 날짜와 시간을 형식으로 반환합니다. POSIXct. 이 형식은 의미가 유사합니다. 유닉스타임, UNIX 시대가 시작된 이후의 초 수를 저장합니다. (31년 1969월 1일부터 1970년 XNUMX월 XNUMX일까지 자정(UTC)).

클래스 POSIXlt 또한 시간과 날짜 및 모든 구성 요소를 저장합니다. 따라서 더 복잡한 구조를 가진 객체이지만 날짜 및 시간 구성요소를 쉽게 얻을 수 있는 이유는 다음과 같습니다. 사실은 POSIXlt 그것 명부.

# Получаем текущую дату и время
current_time_ct <- Sys.time()

# Преобразуем в формат POSIXlt
current_time_lt <- as.POSIXlt(current_time_ct)

# извлекаем компоненты даты и времени
current_time_lt$sec   # секунды
current_time_lt$min   # минуты
current_time_lt$hour  # часы
current_time_lt$mday  # день месяца
current_time_lt$mon   # месяц
current_time_lt$year  # год
current_time_lt$wday  # день недели
current_time_lt$yday  # день года
current_time_lt$zone  # часовой пояс

숫자 및 텍스트 데이터를 형식으로 변환 POSIX* 기능별로 수행 as.POSIXct() и as.POSIXlt(). 이러한 함수에는 작은 인수 집합이 있습니다.

• x — 숫자, 문자열 또는 클래스 객체 날짜, 변환이 필요합니다.
• tz — 시간대, 기본값은 "GMT"입니다.
• 형식 — x 인수에 전달된 데이터가 표시되는 날짜 형식에 대한 설명입니다.
• Origin — 숫자를 POSIX로 변환할 때만 사용되며, 초가 계산되는 날짜 객체와 시간을 이 인수에 전달해야 합니다. 일반적으로 UNIXTIME의 변환에 사용됩니다.

날짜 및 시간 정보가 다음 위치에 있는 경우 유닉스타임, 명확하고 읽기 쉬운 날짜로 변환하려면 다음 예를 사용하십시오.

# Конвертируем UNIXTIME в читаемую дату 
as.POSIXlt(1570084639,  origin = "1970-01-01")

원본에서는 임의의 타임스탬프를 지정할 수 있습니다. 예를 들어, 데이터에 15년 2019월 12일 오후 15시 XNUMX분 이후의 초 수로 날짜와 시간이 포함되어 있는 경우 이를 날짜로 변환하려면 다음을 사용하세요.

# Конвертируем UNIXTIME в дату учитывая что начало отсчёта 15 сентября 2019 12:15
as.POSIXlt(1546123,  origin = "2019-09-15 12:15:00")

lubridate 패키지를 사용하여 날짜 작업

lubridate 아마도 R 언어에서 날짜 작업을 위한 가장 인기 있는 패키지일 것입니다. 이 패키지는 세 가지 추가 클래스를 제공합니다.

• 기간 — 기간, 즉 두 타임스탬프 사이의 초 수;
• 기간 - 기간을 사용하면 사람이 읽을 수 있는 간격(일, 월, 주 등)으로 날짜 간 계산을 수행할 수 있습니다.
• 간격 - 시작 및 종료 시점을 제공하는 개체입니다.

R 언어의 추가 패키지 설치는 표준 기능을 사용하여 수행됩니다. install.packages().

패키지 설치 lubridate:

install.packages("lubridate")

lubridate를 사용하여 텍스트를 날짜로 변환

패키지 기능 lubridate 텍스트를 날짜로 변환하는 과정을 크게 단순화하고 날짜 및 시간을 사용하여 산술 연산을 수행할 수도 있습니다.

이 기능은 현재 날짜 또는 날짜와 시간을 얻는 데 도움이 됩니다. today() и now().

today() # текущая дата
now()   # текущая дата и время

문자열을 날짜로 변환하려면 lubridate 이름이 항상 세 글자로 구성되고 날짜 구성 요소의 순서를 나타내는 전체 함수 계열이 있습니다.

• y-년
• m - 월
• d - 일

lubridate를 통해 텍스트를 날짜로 변환하는 함수 목록

• ymd()
• ydm()
• mdy()
• myd()
• dmy()
• dym()
• yq()

문자열을 날짜로 변환하는 몇 가지 예:

ymd("2017 jan 21")
mdy("March 20th, 2019")
dmy("1st april of 2018")

보시다시피 lubridate 날짜 설명을 텍스트로 인식하는 것이 훨씬 더 효율적이며 형식을 설명하기 위해 추가 연산자를 사용하지 않고도 텍스트를 날짜로 변환할 수 있습니다.

lubridate 패키지를 사용하여 날짜 구성 요소 추출

또한 사용 lubridate 날짜에서 모든 구성 요소를 가져올 수 있습니다.

dt <- ymd("2017 jan 21")

year(dt)  # год
month(dt) # месяц
mday(dt)  # день в месяце
yday(dt)  # день в году
wday(dt)  # день недели

날짜를 사용한 산술 연산

하지만 가장 중요하고 기본적인 기능은 lubridate 날짜를 사용하여 다양한 산술 연산을 수행하는 기능입니다.

날짜 반올림은 세 가지 기능으로 수행됩니다.

• floor_date — 가장 가까운 과거 시제로 반올림
• ceiling_date — 가까운 미래 시제로 반올림
• round_date - 가장 가까운 시간으로 반올림

각 함수에는 인수가 있습니다. 단위초, 분, 시, 일, 주, 월, 격월, 분기, 계절, 반년, 연도 등 반올림 단위를 지정할 수 있습니다.

dt <- ymd("2017 jan 21")

round_date(dt, unit = "month")    # округлить до месяца
round_date(dt, unit = "3 month")  # округлить до 3 месяцев
round_date(dt, unit = "quarter")  # округлить до квартала
round_date(dt, unit = "season")   # округлить до сезона
round_date(dt, unit = "halfyear") # округлить до полугодия

그럼 현재 날짜로부터 8일 후의 날짜를 구하고 두 날짜 사이에 다양한 산술 계산을 수행하는 방법을 알아봅시다.

today() + days(8)   # какая дата будет через 8 дней
today() - months(2) # какая дата была 2 месяца назад
today() + weeks(12) # какая дата будет через 12 недель
today() - years(2)  # какая дата была 2 года назад

기간, time periodsR 패키지를 사용하여 작업을 단순화했습니다.

timeperiodsR — 2019년 XNUMX월 CRAN에 게시된 날짜 작업을 위한 새로운 패키지입니다.

패키지 설치 timeperiodsR:

install.packages("timeperiodsR")

주요 목적은 특정 날짜를 기준으로 특정 시간 간격을 신속하게 결정하는 것입니다. 예를 들어 해당 기능을 사용하면 다음을 쉽게 수행할 수 있습니다.

• 지난 주, 월, 분기 또는 연도를 R로 가져옵니다.
• 날짜를 기준으로 지정된 시간 간격 수(예: 지난 4주)를 가져옵니다.
• 결과 시간 간격에서 시작 및 종료 날짜, 간격에 포함된 일 수, 포함된 전체 날짜 순서 등 구성 요소를 쉽게 추출할 수 있습니다.

모든 패키지 함수의 이름 timeperiodsR 직관적이며 두 부분으로 구성됩니다. 방향_간격, 여기서 :

• 방향 주어진 날짜(last_n, Previous, this, next, next_n)를 기준으로 이동해야 합니다.
• 일시적인 간격 기간 계산: 일, 주, 월, 분기, 연도.

전체 기능 세트:

• last_n_days()
• last_n_weeks()
• last_n_months()
• last_n_quarters()
• last_n_years()
• previous_week()
• previous_month()
• previous_quarter()
• previous_year()
• this_week()
• this_month()
• this_quarter()
• this_year()
• next_week()
• next_month()
• next_quarter()
• next_year()
• next_n_days()
• next_n_weeks()
• next_n_months()
• next_n_quarters()
• next_n_years()
• custom_period()

기간R의 시간 간격

이러한 기능은 지난 주 또는 지난 달의 데이터를 기반으로 보고서를 작성해야 하는 경우에 유용합니다. 지난 달을 얻으려면 같은 이름의 기능을 사용하십시오 previous_month():

prmonth <- previous_month()

그 후에 당신은 객체를 갖게 될 것입니다 월 클래스 tpr, 다음 구성 요소를 쉽게 얻을 수 있습니다.

• 기간의 시작 날짜. 이 예에서는 지난 달입니다.
• 기간 종료일
• 해당 기간에 포함된 일수
• 기간에 포함된 날짜의 순서

또한 각 구성 요소는 다양한 방법으로 얻을 수 있습니다.

# первый день периода
prmonth$start
start(prmonth)

# последний день периода
prmonth$end
end(prmonth)

# последовательность дат
prmonth$sequence
seq(prmonth)

# количество дней входящих в период
prmonth$length
length(prmonth)

인수를 사용하여 구성요소를 가져올 수도 있습니다. 부품, 이는 각 패키지 기능에 존재합니다. 가능한 값: 시작, 끝, 시퀀스, 길이.

previous_month(part = "start")    # начало периода
previous_month(part = "end")      # конец периода
previous_month(part = "sequence") # последовательность дат
previous_month(part = "length")   # количество дней в периоде

그럼 패키지 함수에서 사용할 수 있는 모든 인수를 살펴보겠습니다. timeperiodsR:

• x — 기간이 계산되는 기준 날짜로, 기본적으로 현재 날짜입니다.
• n — 해당 기간에 포함될 간격 수(예: 이전 3주)
• part — 객체의 어떤 구성 요소 tpr 당신은 기본적으로 얻을 필요가 all;
• week_start — 인수는 주 작업을 위한 함수에만 존재하며 시작으로 간주될 주의 요일 수를 설정할 수 있습니다. 기본적으로 주의 시작은 월요일이지만 다음 중 원하는 날짜를 설정할 수 있습니다. 1 - 월요일부터 7 - 일요일까지.

따라서 현재 또는 기타 특정 날짜를 기준으로 기간을 계산할 수 있습니다. 다음은 몇 가지 추가 예입니다.

# получить 3 прошлые недели
# от 6 октября 2019 года
# начало недели - понедельник
last_n_weeks(x = "2019-10-06", 
             n = 3, 
             week_start = 1)

 Time period: from  9 September of 2019, Monday to 29 September of 2019, Sunday

6월 XNUMX일은 일요일입니다:

6월 3일을 기준으로 이전 6주에 해당하는 기간이 필요합니다. 9월 29일이 포함된 주는 제외됩니다. 따라서 XNUMX월 XNUMX일부터 XNUMX월 XNUMX일까지의 기간이다.

# получить месяц отстающий на 4 месяца
# от 16 сентября 2019 года
previous_month(x = "2019-09-16", n = 4)

 Time period: from  1 May of 2019, Wednesday to 31 May of 2019, Friday

이 예에서는 4개월 전의 달에 관심이 있습니다. 16년 2019월 2019일부터 시작하면 XNUMX년 XNUMX월이 됩니다.

timePeriodsR을 사용하여 날짜 벡터 필터링

날짜를 필터링하려면 timeperiodsR 여러 연산자가 있습니다:

• %left_out% - 두 개의 tpr 클래스 객체를 비교하고 오른쪽 객체에 누락된 왼쪽 객체의 값을 반환합니다.
• %left_in% - tpr 클래스의 두 개체를 비교하고 오른쪽 개체에 포함된 왼쪽 개체의 날짜를 반환합니다.
• %right_out% - 두 개의 tpr 클래스 개체를 비교하고 왼쪽 개체에서 누락된 오른쪽 개체의 값을 반환합니다.
• %right_in% - tpr 클래스의 두 개체를 비교하고 왼쪽 개체에 있는 오른쪽 개체의 날짜를 반환합니다.

period1 <- this_month("2019-11-07")
period2 <- previous_week("2019-11-07")

period1 %left_in% period2   # получить даты из period1 которые входят в period2
period1 %left_out% period2  # получить даты из period1 которые не входят в period2
period1 %right_in% period2  # получить даты из period2 которые входят в period1
period1 %right_out% period2 # получить даты из period2 которые не входят в period1

패키지에서 timeperiodsR 공식적인 러시아어가 있습니다 유튜브 재생목록.

결론

우리는 날짜 작업을 위해 R 언어로 설계된 객체 클래스를 자세히 조사했습니다. 또한 이제 날짜에 대한 산술 연산을 수행하고 패키지를 사용하여 모든 기간을 빠르게 얻을 수 있습니다. timeperiodsR.

R 언어에 관심이 있으시면 제 텔레그램 채널을 구독해 주세요. R4마케팅, 일상적인 문제를 해결하기 위해 R 언어를 사용하는 방법에 대해 매일 유용한 자료를 공유합니다.

출처 : habr.com