r - 在 R 中计算年龄

Question

我在 R 中有两个数据框。一个框有一个人的出生年份:

YEAR
/1931
/1924

然后另一列显示最近的时间。

RECENT
09/08/2005
11/08/2005

我想要做的是减去年数，以便我可以用年数计算他们的年龄，但是我不知道如何解决这个问题。请问有什么帮助吗？

Answer 1

以下函数采用 Date 对象的向量并计算年龄，正确计算闰年。似乎是比任何其他答案更简单的解决方案。

age = function(from, to) {
  from_lt = as.POSIXlt(from)
  to_lt = as.POSIXlt(to)

  age = to_lt$year - from_lt$year

  ifelse(to_lt$mon < from_lt$mon |
         (to_lt$mon == from_lt$mon & to_lt$mday < from_lt$mday),
         age - 1, age)
}