在给定日期的向量中最近的日期

Question

我想确定给定日期的向量中最接近的日期.假设我有以下日期向量(有5个随机日期):

coldate= as.Date(c("2013-08-03", "2013-09-04", "2013-09-08", "2013-09-12", "2013-11-01"));

现在,我想x = as.Date("2013-10-01")在这个向量中找到最接近的日期.

这是我的代码:

> which((coldate-x) == min(coldate-x))
  [1] 1

结果应该是4,因为日期"2013-09-12"是最接近的.但是,我有1 ...我的代码有什么问题？

Answer 1

你错过了abs照顾负面价值观:

which(abs(coldate-x) == min(abs(coldate - x)))
[1] 4

Answer 2

另见which.min功能:

R> which.min(abs(x-coldate))
[1] 4

Answer 3

包中的which.closest()函数birk是一个简单的选项。

coldate= as.Date(c("2013-08-03", "2013-09-04", "2013-09-08", "2013-09-12", "2013-11-01"))
x = as.Date("2013-10-01")

which.closest(coldate, x)
[1] 4