kableExtra的collapse_rows遇换行符失效问题求助

当使用kableExtra的collapse_rows合并行时，如果单元格内容包含换行符（比如用linebreak()函数生成，或直接写入LaTeX换行命令），同时kable设置了escape = FALSE，会出现无法合并目标单元格的情况。

失效示例代码 #

library(kableExtra)
df <- data.frame(A = linebreak(rep("a\nb\nc", 3)), B = c(1,2,3))
table <- kable(df, format = "latex", escape = FALSE) %>%
    collapse_rows(columns = 1, valign = "middle")
table

方案1：直接使用LaTeX换行命令替代linebreak() #

不需要依赖linebreak()函数，直接在字符串中写入LaTeX的换行命令\\\\，这样单元格内容是统一的纯字符串，collapse_rows可以正常识别并合并：

library(kableExtra)
df <- data.frame(A = rep("a\\\\b\\\\c", 3), B = c(1,2,3))
table <- kable(df, format = "latex", escape = FALSE) %>%
    collapse_rows(columns = 1, valign = "middle")
table

方案2：保留原始分组标识，手动指定合并依据 #

如果必须使用linebreak()，可以在数据框中保留原始的未格式化字符串作为分组依据，通过collapse_rows的row_group_label参数指定合并逻辑：

library(kableExtra)
library(dplyr)

# 同时保留原始字符串和格式化后的换行内容
df <- data.frame(
  A_raw = rep("a\nb\nc", 3),
  B = c(1,2,3)
) %>%
  mutate(A = linebreak(A_raw))

# 指定row_group_label为原始分组列，绕过默认内容比较逻辑
table <- kable(df %>% select(A, B), format = "latex", escape = FALSE) %>%
  collapse_rows(columns = 1, valign = "middle", row_group_label = df$A_raw)
table

原因说明 #

collapse_rows默认通过比较单元格的渲染内容判断是否合并行。当使用linebreak()时，单元格内容会被转换为带有LaTeX tabular环境的特殊对象，函数内部的字符串比较逻辑无法识别这些对象为相同内容，导致合并失效。而直接使用LaTeX换行命令的字符串完全一致，或手动指定分组标识，都能绕过这个问题，实现正常合并。

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