R - 仅具有固定效果的 lfe (felm) 拟合模型

R - lfe (felm) fit model with fixed effects only

我正在使用 lfe 包中的 felm() 函数来拟合具有大量固定效应的线性模型。我希望能够仅使用固定效果来拟合模型。例如,我希望能够知道此类模型的 R^2,并可能将其与具有更大预测变量集的模型进行比较。考虑以下示例:

library(lfe)

N = 1000

A = sample(1:3, N, replace = TRUE)
B = sample(1:5, N, replace = TRUE)

C = A + B + rnorm(N)

Data = data.frame(A, B, C)
Data$A = as.factor(A)
Data$B = as.factor(B)

summary(felm(C ~ 1 | A + B, data = Data))

这只是回应:

Call:
   felm(formula = C ~ 1 | A + B, data = Data) 

Residuals:
    Min      1Q  Median      3Q     Max 
-3.8101 -0.6750  0.0014  0.6765  4.4254 

Coefficients:
(No coefficients)

类似地,如果我使用:names(summary(felm(C ~ 1 | A + B, data = Data))) 我得到:

[1] "residuals" "p"         "Pp"        "call"   

而对于我指定 FE 以外的变量的模型,我在摘要中得到了更多的属性,包括 R^2。

我也试过只在我的数据中添加一个变量,这是一组变量,但这没有用。

我可以使用常规 lm() 函数 (summary(lm(C ~ A + B, data = Data))) 轻松获得此功能,但这会剥夺我 felm() 函数的价值:

fixest 包(处理高维固定效应至少与 lfe 一样流畅)returns 一组统计数据,例如调整后的 R 平方:

> summary(fixest::feols(C ~ 1 | A + B, data = Data))
# OLS estimation, Dep. Var.: C
# Observations: 1,000 
# Fixed-effects: A: 3,  B: 5
# RMSE: 0.994166   Adj. R2: 0.733952