plr中调用之间的持久数据存储

Question

我有一个Web应用程序，在进行自适应测试时使用plr与R对话。 我需要找到一种在调用之间持久存储静态数据的方法。

我有一个昂贵的计算创建一个项目库，而不是很多便宜的人在每个响应提交后获得下一个项目。但是目前我找不到一种方法来持久存储昂贵计算的结果。

将它放入数据库似乎是一个很大的开销。

library(catR)
data(tcals)
itembank <- createItemBank(tcals) --this is the expensive call
nextItem(itembank, 0) # item 63 is selected

我试图保存并加载结果，就像这样，但它似乎不起作用，第二个NOTICE的结果是'itembank'。

save(itembank, file="pltrial.Rdata")
pg.thrownotice(itembank)

aaa=load("pltrial.Rdata")
pg.thrownotice(aaa)

我也试过保存并加载工作区，但也没有成功。 知道怎么做吗？

Answer 1

load函数直接将对象加载到工作区中。您不必分配返回值（只是加载的对象的名称，如您所发现的那样）。如果您在加载后执行ls()，则应该找到itembank对象。