我可以使用以下代碼從今天開始找到某些年前的日期:
library(lubridate)
today <- format(Sys.Date())
pre_3years <- ymd(today) - years(3)
pre_3years
出去:
[1] "2018-12-27"
事實上,我希望得到 的第一天pre_3year,2018-01-01對于這個例子,我怎么能lubridate在 R中使用包?謝謝。
uj5u.com熱心網友回復:
您可以使用floor_datefromlubridate來獲取一年中的第一天。
library(lubridate)
first_day_of_n_prev <- function(x) {
floor_date(Sys.Date() - years(x), 'year')
}
first_day_of_n_prev(3)
#[1] "2018-01-01"
first_day_of_n_prev(2)
#[1] "2019-01-01"
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/394482.html
下一篇:基于時間的gcloud過濾結果
