R data.table和saveRDS

Question

我想使用saveRDS保存并加载我的data.tables。我的工作如下：

dt <- data.table(1:3)

# saving to disk:
saveRDS(dt,"ThisIsMyDT")

# reloading in a different session:
dt <- readRDS("ThisIsMyDT")

# and since the pointer does not exist:
attr(dt,".internal.selfref")
alloc.col(dt)

有更好的方法吗？不知怎的，我怀疑我能/应该在saveRDS和readRDS函数中使用refhook参数。但是，我无法弄清楚我是怎么做到的......