从R中的日期列计算并添加列length_of_time

Question

我正在尝试创建一个新的计算字段length_of_time.我有一个日期列final_date:

2/10/2016  
4/4/2016  
5/8/2016  
10/1/2016

我正在尝试计算一个新字段,显示10/23/2016和final_date之间的时间长度.

我尝试使用dplyr:

mutate(df, length_of_time = 10/23/2016 - final_date) 

并收到错误:

"eval中的错误(替换(expr),envir,enclos):只能从"POSIXt"对象中减去"

所以我试着用:

df <- as.POSIXlt(df$final_date)

并再次运行我的原始代码,只收到以下错误:

Error in UseMethod("mutate_") : 
  no applicable method for 'mutate_' applied to an object of class "c('POSIXlt', 'POSIXt')"

Answer 1

你的日期格式有点困惑.(参见代码注释以获得解释)

library(dplyr)

df <- data.frame(final_date = c("2/10/2016","4/4/2016"))

## you need to specify the format of your date columns as it is ambiguous
## I've guessed you're using day/month/year
df$final_date <- as.POSIXct(df$final_date, format = "%d/%m/%Y")

## and you need to subtract the `final_date` (which is POSIXct) 
## from another POSIXct object
mutate(df, length_of_time = as.POSIXct("2016-10-23") - final_date)

final_date length_of_time
1 2016-10-02  20.95833 days
2 2016-04-04 201.95833 days

进一步阅读

• 伯克利 - R的日期和时代

• 处理R中的日期时间

帮助理解POSIXct和POSIXlt日期格式,日期计算等之间的区别.