R에서 날짜 간격을 구하는 법

 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