添加稳健标准误差后如何 name/save R 中的模型?
How do I name/save a model in R after adding robust standard errors?
如何在 R 中校正异方差后命名模型?基本上,我如何保存模型以使其包含稳健的标准误差?如果有区别,我正在使用 plm 包。
假设我有下面这两个模型:
model1<-plm(x~y+z,data=dataset,model="within")
model2<-plm(x~y,data=dataset,model="within")
但后来我纠正了异方差:
coeftest(model1,vcovHC)
coeftest(model2,vcovHC)
如何保存模型以便进行 Wald 检验来比较两者?我尝试在下面执行以下操作,但它似乎不正确:
model1B<-coeftest(model1,vcovHC)
model2B<-coeftest(model2,vcovHC)
基本上我正在尝试能够执行以下操作但具有可靠的标准错误:
waldtest(model1,model2)
使用 ?plm::vcovHC
中的第一个示例并加载更多包,包括 lmtest
我最终找到 waldtest
的包,我以这种方式进一步进行:
zz2 <- plm(log(gsp) ~ log(pcap) + log(pc) + log(emp) ,
data = Produc, model = "random")
然后比较使用 vcovHC 作为 waldtest 中 vcov 参数的参数:
waldtest(zz, zz2, vcov=vcovHC)
Wald test
Model 1: log(gsp) ~ log(pcap) + log(pc) + log(emp) + unemp
Model 2: log(gsp) ~ log(pcap) + log(pc) + log(emp)
Res.Df Df Chisq Pr(>Chisq)
1 811
2 812 -1 7.0021 0.008141 **
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
使用默认 vcov:
> waldtest(zz, zz2)
Wald test
Model 1: log(gsp) ~ log(pcap) + log(pc) + log(emp) + unemp
Model 2: log(gsp) ~ log(pcap) + log(pc) + log(emp)
Res.Df Df Chisq Pr(>Chisq)
1 811
2 812 -1 46.284 1.023e-11 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
如何在 R 中校正异方差后命名模型?基本上,我如何保存模型以使其包含稳健的标准误差?如果有区别,我正在使用 plm 包。
假设我有下面这两个模型:
model1<-plm(x~y+z,data=dataset,model="within")
model2<-plm(x~y,data=dataset,model="within")
但后来我纠正了异方差:
coeftest(model1,vcovHC)
coeftest(model2,vcovHC)
如何保存模型以便进行 Wald 检验来比较两者?我尝试在下面执行以下操作,但它似乎不正确:
model1B<-coeftest(model1,vcovHC)
model2B<-coeftest(model2,vcovHC)
基本上我正在尝试能够执行以下操作但具有可靠的标准错误:
waldtest(model1,model2)
使用 ?plm::vcovHC
中的第一个示例并加载更多包,包括 lmtest
我最终找到 waldtest
的包,我以这种方式进一步进行:
zz2 <- plm(log(gsp) ~ log(pcap) + log(pc) + log(emp) ,
data = Produc, model = "random")
然后比较使用 vcovHC 作为 waldtest 中 vcov 参数的参数:
waldtest(zz, zz2, vcov=vcovHC)
Wald test
Model 1: log(gsp) ~ log(pcap) + log(pc) + log(emp) + unemp
Model 2: log(gsp) ~ log(pcap) + log(pc) + log(emp)
Res.Df Df Chisq Pr(>Chisq)
1 811
2 812 -1 7.0021 0.008141 **
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
使用默认 vcov:
> waldtest(zz, zz2)
Wald test
Model 1: log(gsp) ~ log(pcap) + log(pc) + log(emp) + unemp
Model 2: log(gsp) ~ log(pcap) + log(pc) + log(emp)
Res.Df Df Chisq Pr(>Chisq)
1 811
2 812 -1 46.284 1.023e-11 ***
---
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1