R Strptime年份和月份没有分隔符返回NA

Question

我可能做了一些愚蠢而没有看到它的东西,但是:

> strptime("201101","%Y%m")
[1] NA

从帮助strptime:

%Y年份与世纪
%m月份为十进制数字(01-12)

Answer 1

只需粘贴您忽略的日期字段(例如"01"):

R> shortdate <- "201101"
R> as.Date(paste(shortdate, "01", sep=""), "%Y%m%d")
[1] "2011-01-01"
R> 

我喜欢as.Date()的日期,并strptime()为POSIXct对象,即日期和时间.

然后,您可以将解析的Date对象转换为POSIXlt对象以检索年和月:

R> mydt <- as.Date(paste(shortdate, "01", sep=""), "%Y%m%d")
R> myp <- as.POSIXlt(mydt)
R> c(myp$year, myp$mon)
[1] 111   0
R> 

这是标准的POSIX行为,年份为"年 - 1900",月份为零索引.

七年后编辑:为了完整性,并且正如有人赞成这个,我的随时包中的函数可以帮助:

R> anytime::anydate("201101")    ## returns a Date
[1] "2011-01-01"
R> anytime::anytime("201101")    ## returns a Datetime
[1] "2011-01-01 CST"
R> 

使用不同的解析器(来自Boost Date_time,它更慷慨并且会导致丢失的一天(或第二种情况下的日/小时/分钟/秒).