r - 日期作为因子的错误转换为日期

Question

我在计算从 .csv 文件导入的日期时遇到问题。我想要做的是在因子 DateClosed 中获取该日期并在日期字段 (a) 中生成一个日期。例如，如果 a=203 我希望日期等于 DateClosed-203。但是，我在使用下面列出的代码时遇到了问题。

DateClose 是一个因素。

> head(DateClosed)
[1] 7/30/2007  12/12/2007 5/8/2009   6/24/2009  6/24/2009  2/29/2008 
165 Levels: 1/12/2010 1/15/2011 1/15/2013 1/17/2009 1/18/2008 1/19/2012 1/2/2013 1/21/2013 1/22/2010 1/24/2013 1/26/2014 ... 9/7/2010
> head(as.Date(DateClosed,format="%m/%d/%y"))
[1] "2020-07-30" "2020-12-12" "2020-05-08" "2020-06-24" "2020-06-24" "2020-02-29"

 head(as.Date(DateClosed,format="%m/%d/%y"))-203
[1] "2020-01-09" "2020-05-23" "2019-10-18" "2019-12-04" "2019-12-04" "2019-08-10"

它正确减去了 203 天，但由于某种原因读错了日期。

Answer 1

DateClosed <- factor(c("7/30/2007","12/12/2007", "5/8/2009"))
as.Date(DateClosed, format="%m/%d/%Y")

产生:

[1] "2007-07-30" "2007-12-12" "2009-05-08"

注意 format 中的大写字母“Y”参数。小写的“y”代表两位数的年份，所以 as.Date读取年份标记的前两位数字(“20”)，然后假设它仅指年份的最后两位数字，并添加当前日期的世纪(也是“20”)，因此您最终得到日期2020。