fixest包etable函数在R Markdown编织时报错（单独运行正常）

可复现代码示例 #

---
title: "fixest etable编织报错复现"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(fixest)

# 生成模拟数据
set.seed(123)
df <- data.frame(
  y = rnorm(100),
  x1 = rnorm(100),
  x2 = rnorm(100),
  group = sample(1:10, 100, replace = TRUE)
)

# 运行回归模型
reg1 <- feols(y ~ x1, data = df)
reg2 <- feols(y ~ x1 + x2 | group, data = df)

# 编织时会报错：找不到对象'res_df'
etable(reg1, reg2)

## 解决方案

### 方法1：显式指定etable的运行环境
在调用`etable`时添加`env = parent.frame()`参数，确保内部临时对象能在代码块环境中被访问：
```r
```{r render_table, results='asis'}
etable(reg1, reg2, env = parent.frame())

### 方法2：将回归结果存入列表后传递给etable
把回归对象打包成列表再传入`etable`，避免环境隔离导致的对象查找失败：
```r
```{r render_table, results='asis'}
reg_list <- list("基础模型" = reg1, "含固定效应模型" = reg2)
etable(reg_list, env = parent.frame())

### 方法3：强制捕获并输出etable的HTML/LaTeX代码
直接生成格式化输出代码并通过`cat`打印，绕开内部环境问题：
```r
```{r render_table, results='asis'}
# 针对HTML输出
table_html <- etable(reg1, reg2, format = "html")
cat(table_html)

# 如果是PDF输出，改用format = "latex"
# table_latex <- etable(reg1, reg2, format = "latex")
# cat(table_latex)

### 方法4：在回归时保留原始数据
运行`feols`时添加`keep.data = TRUE`参数，确保模型对象包含完整数据上下文：
```r
```{r run_regressions}
reg1 <- feols(y ~ x1, data = df, keep.data = TRUE)
reg2 <- feols(y ~ x1 + x2 | group, data = df, keep.data = TRUE)

etable(reg1, reg2)

### 方法5：设置代码块使用全局环境
在报错的代码块中添加`envir = globalenv()`参数，让代码块在全局环境中执行：
```r
```{r render_table, results='asis', envir = globalenv()}
etable(reg1, reg2)

内容的提问来源于stack exchange，提问作者Alexander Guggenberger