Question

有没有一种快速计算两年间差异的方法 a）日期（数据$ First.Trading.Day）例如。 “2016-02-09”和 b）一年（数据$ Founding.Year），例如“1999”

我已经做了以下操作，但没有得到正确的结果：

data$Age <- difftime(data$First.Trading.Day, data$Founding.Year, "years")

然后我创建了一个新的专栏，只有第一个交易日的年份，并尝试了这个：

data$First.Trading.Year <- format(as.Date(data$First.Trading.Day),"%Y")
data$Age <- (data$First.Trading.Year) - (data$Founding.Year)

这给了我一条错误消息

我真的很感激一些帮助！

Answer 1

润滑剂解决方案：

libray(lubridate)

date <- ymd("2016-02-09", "2012-05-19")
years_diff <- year(date) - 1999

# 17 13

Answer 2

A=c('2017-01-01','2015-01-01')
B=c('2016-01-01','2014-01-01')
data=data.frame(A)
data$B=B
data$A <- format(as.Date(data$A),"%Y")
data$B <- format(as.Date(data$B),"%Y")
data$Age <- as.numeric(data$A) - as.numeric(data$B)
data
     A    B Age
1 2017 2016   1
2 2015 2014   1

您的错误代码：Error in (data$A) - (data$B) : non-numeric argument to binary operator

R：如何计算日期和年份之间的年份差异

2 个答案: