R为as.Date设置默认原点

xm1*_*xm1 4 r as.date

有没有办法为as.Date设置默认原点?我做了这个功能解决方法:

as.date=function(x, origin='1970-01-01') as.Date(x, origin=origin)
Run Code Online (Sandbox Code Playgroud)

例如:

as.Date(0)
Error in as.Date.numeric(0) : 'origin' deve ser especificado

as.date(0)
[1] "1970-01-01"
Run Code Online (Sandbox Code Playgroud)

G. *_*eck 6

zoo包添加了一个默认的来源:

library(zoo)

as.Date(0)
## [1] "1970-01-01"
Run Code Online (Sandbox Code Playgroud)