如何将R日期转换为给定出生日期的数字？

Question

我想将日期转换为00-01-0000（它是MATLAB的原点）的天数。

e.g。

dt_str <- '2016-05-20'
dt <- as.Date(dt_str)
dt_num <- SOME_FUNCTION(dt, origin = '0000-01-01')

我无法使用as.Date.numeric()。