实际上,正如上面(以及SO的其他地方)所提到的那样,为了将字符串转换为日期,您需要一个月的特定日期。从as.Date()
手册页:
如果日期字符串未完全指定日期,则返回的答案可能是系统特定的。最常见的行为是假设缺少的年份,月份或日期是当前年份。如果错误地指定了日期,则可靠的实现将给出错误,并且日期将报告为NA。不幸的是,一些常见的实现(例如glibc
)不可靠,无法猜测预期的含义。
一个简单的解决方案是将日期粘贴"01"
到每个日期,并使用strptime()
它来表示该月的第一天。
对于那些希望在R中处理日期和时间有更多背景的人:
在R中,时间使用POSIXct
,POSIXlt
类别和日期使用Date
类别。
日期存储为自1970年1月1日以来的天数,时间存储为自1970年1月1日以来的秒数。
因此,例如:
d <- as.Date("1971-01-01")
unclass(d) # one year after 1970-01-01
# [1] 365
pct <- Sys.time() # in POSIXct
unclass(pct) # number of seconds since 1970-01-01
# [1] 1450276559
plt <- as.POSIXlt(pct)
up <- unclass(plt) # up is now a list containing the components of time
names(up)
# [1] "sec" "min" "hour" "mday" "mon" "year" "wday" "yday" "isdst" "zone"
# [11] "gmtoff"
up$hour
# [1] 9
要对日期和时间执行操作:
plt - as.POSIXlt(d)
# Time difference of 16420.61 days
要处理日期,您可以使用strptime()
(从手册页借用这些示例):
strptime("20/2/06 11:16:16.683", "%d/%m/%y %H:%M:%OS")
# [1] "2006-02-20 11:16:16 EST"
# And in vectorized form:
dates <- c("1jan1960", "2jan1960", "31mar1960", "30jul1960")
strptime(dates, "%d%b%Y")
# [1] "1960-01-01 EST" "1960-01-02 EST" "1960-03-31 EST" "1960-07-30 EDT"