日期向量上的 R setdiff 函数会导致奇怪的结果

Question

我正在尝试使用以下代码获取迄今为止所有工作日的向量:

days_of_month = seq(as.Date("2017-01-01"), as.Date("2017-01-31"), by="days")
sundays = c(as.Date("2017-01-01"), as.Date("2017-01-08"), as.Date("2017-01-15"), as.Date("2017-01-22"), as.Date("2017-01-29"))

当我这样做时:

working_days = setdiff(days_of_month, sundays)

setdiff 的返回值是一个奇怪值的向量:

[1] 17168 17169 17170 17171 17172 17173 17175 17176 17177 17178 17179 17180
[13] 17182 17183 17184 17185 17186 17187 17189 17190 17191 17192 17193 17194
[25] 17196 17197

这些值是什么？如何获取 days_of_month 中但不在 sundays 中的日期向量？

Answer 1

这些是 R S3 类 Date 的内部数值。您可以通过 as.numeric(days_of_month) 查看数值。或者，您可以通过 as.Date(working_days, origin="1970-01-01") 将结果转换为 Date。