从‘`zlogit$sim()’中提取输出(Zelig)

Question

我仍在努力适应Zelig开发人员正在使用的全新语法(在Zelig5中，说明如何安装当前的开发版本这里)。感觉很像毕多诺，除了，不是.

无论如何，我只想存储sim练习的结果，但只能知道如何将结果打印到控制台。

让我们使用引用的在文件中示例(好吧，有点更新以反映所看到的Zelig5语法，例如这里)：

set.seed(1234)
library(Zelig) #Zelig_5.0-5
ztob<-ztobit$new() 
ztob$zelig(durable~age+quant,data=tobin)
ztob$setx(ztob)
ztob$sim()
summary(ztob)

 sim x :
 -----
ev
      mean        sd      50%      2.5%    97.5%
1 1.534273 0.6350075 1.451001 0.5103966 3.042459
pv
         mean       sd      50% 2.5%    97.5%
[1,] 3.002031 4.027547 1.310886    0 13.19713

我真的不知道pv是什么意思(没有详细说明)，但是我很确定我想要的期望值是1.53 (在ev，mean下)。

有人能想出如何提取这个值吗？我找不到像summary.Zelig或summary.zelig这样的东西；我试过：

• summary(ztob)$ev / ztob$ev
• print(summary(ztob))
• summary(ztob)[1] / summary(ztob)[[1]]

什么都行?

Answer 1

在这种情况下，str是你的朋友。

您可以得到所有的值：

x<-unlist(ztob[["sim.out"]][["x"]][["ev"]])

和平均数：

mean(x)