将ISOdatetime转换为数字并返回

Question

如何将表示ISOdatetime对象的数值转换回POSIXlt？我尝试了以下但我不知道如何获得a。

的初始格式

a<-ISOdatetime(2013, 07, 22, 00, 00, 00, tz = "GMT")
b<-as.numeric(a)
class(a)<-c("POSIXct","POSIXt")

另一个问题是如何用数字日期时间计算？我希望我能在八月份度过一天。

 numericday<-as.numeric(ISOdatetime(2013, 07, 22, 00, 00, 00, tz = "GMT"))-as.numeric(ISOdatetime(2013, 07, 23, 00, 00, 00, tz = "GMT"))
 as.POSIXlt(b+20*numericday,origin = "1960-01-01",tz="GMT")
 as.POSIXlt(b+20*60*60*24,origin = "1960-01-01",tz="GMT")