【发布时间】:2015-06-18 09:04:53
【问题描述】:
我的数据框如下所示:
unique.groups<- letters[1:5]
unique_timez<- 1:20
groups<- rep(unique.groups, each=20)
my.times<-rep(unique_timez, 5)
play.data<- data.frame(groups, my.times, y= rnorm(100), x=rnorm(100), POP= 1:100)
我想运行以下加权回归:
plm(y~x + factor(my.times) ,
data=play.data,
index=c('groups','my.times'), model='within', weights= POP)
但我不相信 plm 包允许权重。答案我正在从下面的模型中寻找系数:
fit.regular<- lm(y~x + factor(my.times) + factor(my.groups),
weights= POP, data= play.data)
desired.answer<- coefficients(fit.regular)
但是,我正在寻找 plm 包的答案,因为使用 plm 获得更大数据集和许多组的内部估计器的系数要快得多。
【问题讨论】:
-
plm的开发版本现在为plm()提供了一个weights参数。
标签: r linear-regression panel-data plm