我有一个在进行自适应测试时使用 plr 与 R 对话的 Web 应用程序。我需要找到一种在调用之间持久存储静态数据的方法。
我有一个昂贵的计算来创建一个项目库,而不是在每次响应提交后获得下一个项目的许多便宜的计算。但是目前我找不到一种方法来持久存储昂贵计算的结果。
将它放入数据库似乎是很多开销。
library(catR)
data(tcals)
itembank <- createItemBank(tcals) --this is the expensive call
nextItem(itembank, 0) # item 63 is selected
我试图像这样保存并加载结果,但它似乎不起作用,第二个通知的结果是'itembank'。
save(itembank, file="pltrial.Rdata")
pg.thrownotice(itembank)
aaa=load("pltrial.Rdata")
pg.thrownotice(aaa)
我也尝试保存和加载工作区,但也没有成功。知道怎么做吗?