R에서 날짜 간격을 구하는 일은 아주 많은데, 구하는 방법은 잘 알려져 있지 않다. 그래서 아래와 같이 날짜 간격을 구하고자 한다.
만약에 "2022-03-01"과 "2021-12-03"의 날짜 간격을 구하고자 할 때 주/일/시간은 구하기 어렵지 않다.
날짜구하기
# 첫번째 날짜와 두번째 날짜 구하기
first_date <- as.Date("2021-12-02")
last_date <- as.Date("2022-03-12")
# 일자 구하기
difftime(last_date, first_date, units = "days")
## Time difference of 100 days
# 주간 구하기
difftime(last_date, first_date,, units = "weeks")
## Time difference of 14.28571 weeks
#시간 구하기
difftime(last_date, first_date,, units = "hours")
## Time difference of 2400 hours
#분 구하기
difftime(last_date, first_date,, units = "mins")
## Time difference of 144000 mins
하지만 월을 구하는 것은 libridate 를 약간 응용해야 한다. 다만 위와 같이 소숫점이 나오지 않는 것에 대한 것은 유의 하여야 한다. library(lubridate)
##
## 다음의 패키지를 부착합니다: 'lubridate'
## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, union
# 월 구하기
number_of_months = (year(last_date) - year(first_date)) * 12 + month(last_date) - month(first_date)
number_of_months
## [1] 3
댓글 없음:
댓글 쓰기