R语言将5位数字日期转为正常日期

R语言中用double表示日期,即从1970-1-1距离给定日期的天数,将5位数字日期转为正常日期格式的方法

as.Date(16543,origin='1970-1-1')