R 语言经典实例（原书第 2 版）

200

｜

第

7

章

7.11 得到儒略日期

7.11.1 问题

给定一个 Date 对象，你需要提取儒略日期（Julian date）

—

在 R 中，是 1970 年 1 月

1 日以来的天数。

7.11.2 解决方案

将 Date 对象转换为整数或使用 julian 函数：

d <- as.Date("2019-03-15")

as.integer(d)

#> [1] 17970

jd <- julian(d)

jd

#> [1] 17970

#> attr(,"origin")

#> [1] "1970-01-01"

attr(jd, "origin")

#> [1] "1970-01-01"

7.11.3 讨论

儒略“日期”只是自任意起点以来的天数。在 R 中，起始点是 1970 年 1 月 1 日，与 Unix

系统的起点相同。因此，1970 年 1 月 1 日的儒略日期为零，如下所示：

as.integer(as.Date("1970-01-01"))

#> [1] 0

as.integer(as.Date("1970-01-02"))

#> [1] 1

as.integer(as.Date("1970-01-03"))

#> [1] 2

7.12 提取日期的一部分

7.12.1 问题

给定 Date 对象，你需要提取日期的一部分，例如星期几、一年中的某一天、日历日、

日历月或日历年。

7.12.2 解决方案

将 Date 对象转换为 POSIXlt 对象，该对象是一个日期的各个部分的列表。 然后从该

列表中提取所需的部分：

字符串和日期 ...