由于我在指出这是重复之前写了这个,所以无论如何我都会将其添加为答案。基本上包fasttime
可以帮助你如果你有日期之后 1970-01-01 00:00:00
并且他们是GMT
并且他们是格式的year, month, day, hour, minute, second
。如果您可以将日期重写为这种格式,那么fastPOSIXct
将很快:
# data
date <- c( "2013/5/31 23:30" , "2013/5/31 23:35" , "2013/5/31 23:40" , "2013/5/31 23:45" )
require(fasttime)
# fasttime function
dates.ft <- fastPOSIXct( date , tz = "GMT" )
# base function
dates <- as.POSIXct( date , format= "%Y/%m/%d %H:%M")
# rough comparison
require(microbenchmark)
microbenchmark( fastPOSIXct( date , tz = "GMT" ) , as.POSIXct( date , format= "%Y/%m/%d %H:%M") , times = 100L )
#Unit: microseconds
# expr min lq median uq max neval
# fastPOSIXct(date, tz = "GMT") 19.598 21.699 24.148 25.5485 215.927 100
# as.POSIXct(date, format = "%Y/%m/%d %H:%M") 160.633 163.433 168.332 181.9800 278.220 100
但问题是,将日期转换为fasttime
可以接受的格式是否更快,或者只是使用as.POSIXct
或购买更快的计算机?!