r - 将 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")