如何解决RMarkdown中涉及维度的eval错误？

问题重现 #

渲染包含以下代码的RMarkdown文档时，出现维度相关的eval错误，但将代码块单独在R控制台运行时完全正常：

---
title: "trial"
author: "X"
date: "X"
output:
  word_document:
    toc: yes
    toc_depth: '2'
  html_document:
    fig_caption: yes
    theme: journal
    toc: yes
    toc_depth: 2
  pdf_document:
    fig_caption: yes
    fig_crop: no
    fig_height: 4
    fig_width: 7
    highlight: haddock
    keep_tex: yes
    number_sections: yes
    toc: yes
    toc_depth: 2
header-includes:
- \usepackage{graphicx}
- \usepackage{float}
---

knitr::opts_chunk$set(fig.path='figure/graphics-', 
                 cache.path='cache/graphics-', 
                 fig.align='center',
                 external=TRUE,
                 echo=TRUE,
                 warning=FALSE,
                 fig.pos='H', ft.tabcolsep=0, ft.latex.float = "none"
                )

dat_na = data.frame(v1 =ifelse(ttINT_1$HMM$tt$incl == "-", NA, ttINT_1$HMM$tt$incl),
                    v2 = ifelse(ttINT_1$IMM$tt$incl == "-",NA, ttINT_1$IMM$tt$incl), 
                    v3 = ifelse(ttINT_1$LMM$tt$incl == "-",NA, ttINT_1$LMM$tt$incl)
)

可能的原因及解决办法 #

1. 缓存冲突 #

setup代码块中开启了缓存（cache.path配置），如果之前缓存的ttINT_1对象维度或结构和当前版本不一致，就会导致渲染时出现维度不匹配错误。

解决办法：

• 直接删除RMarkdown目录下的cache文件夹，清空旧缓存
• 在出问题的代码块中添加cache=FALSE，强制该块不使用缓存：

{r echo=TRUE, message=FALSE, warning=FALSE, paged.print=FALSE, cache=FALSE}
dat_na = data.frame(v1 =ifelse(ttINT_1$HMM$tt$incl == "-", NA, ttINT_1$HMM$tt$incl),
                    v2 = ifelse(ttINT_1$IMM$tt$incl == "-",NA, ttINT_1$IMM$tt$incl), 
                    v3 = ifelse(ttINT_1$LMM$tt$incl == "-",NA, ttINT_1$LMM$tt$incl)
)

2. 环境变量差异 #

RMarkdown渲染时会启动一个全新的R环境，而你单独运行代码时用的是当前工作环境，两者中的ttINT_1对象可能不是同一个版本（比如渲染时ttINT_1未正确加载，或加载的是旧数据）。

解决办法：

• 在RMarkdown文档开头添加加载ttINT_1的代码（比如load("ttINT_1.RData")或生成该对象的完整代码），不要依赖全局环境中的对象
• 在出问题的代码块开头添加调试代码，确认渲染时ttINT_1的结构：

{r echo=TRUE, message=FALSE, warning=FALSE, paged.print=FALSE, cache=FALSE}
# 调试：检查各字段的结构和长度
print(str(ttINT_1$HMM$tt$incl))
print(length(ttINT_1$HMM$tt$incl))
print(str(ttINT_1$IMM$tt$incl))
print(length(ttINT_1$IMM$tt$incl))
print(str(ttINT_1$LMM$tt$incl))
print(length(ttINT_1$LMM$tt$incl))

dat_na = data.frame(v1 =ifelse(ttINT_1$HMM$tt$incl == "-", NA, ttINT_1$HMM$tt$incl),
                    v2 = ifelse(ttINT_1$IMM$tt$incl == "-",NA, ttINT_1$IMM$tt$incl), 
                    v3 = ifelse(ttINT_1$LMM$tt$incl == "-",NA, ttINT_1$LMM$tt$incl)
)

3. ifelse返回值维度异常 #

如果ttINT_1$HMM$tt$incl等字段不是向量（比如是矩阵、列表或其他复杂结构），ifelse可能返回非预期的维度，导致创建data.frame时出错。手动运行时环境中的该字段可能是向量，但渲染时不是。

解决办法：

• 用dplyr::if_else替代基础包的ifelse，它对输入类型和维度的检查更严格：

library(dplyr)
dat_na = data.frame(v1 = if_else(ttINT_1$HMM$tt$incl == "-", NA_character_, ttINT_1$HMM$tt$incl),
                    v2 = if_else(ttINT_1$IMM$tt$incl == "-", NA_character_, ttINT_1$IMM$tt$incl), 
                    v3 = if_else(ttINT_1$LMM$tt$incl == "-", NA_character_, ttINT_1$LMM$tt$incl)
)

• 强制将每个字段转为向量：

dat_na = data.frame(v1 =ifelse(as.vector(ttINT_1$HMM$tt$incl) == "-", NA, as.vector(ttINT_1$HMM$tt$incl)),
                    v2 = ifelse(as.vector(ttINT_1$IMM$tt$incl) == "-",NA, as.vector(ttINT_1$IMM$tt$incl)), 
                    v3 = ifelse(as.vector(ttINT_1$LMM$tt$incl) == "-",NA, as.vector(ttINT_1$LMM$tt$incl))
)

4. 多输出格式的潜在冲突 #

文档同时指定了word、html、pdf三种输出格式，部分格式的渲染逻辑可能对数据处理有特殊影响。

解决办法：

• 先注释掉其他输出格式，只保留一种（比如html_document），测试是否还会报错，逐步排查是否是特定格式导致的问题

内容的提问来源于stack exchange，提问作者12666727b9