使用knitr生成PDF时，如何区分代码与输出文本的颜色？

一、修改代码与输出的颜色 #

方法1：用knitr钩子自定义输出颜色 #

在R Markdown文档的开头代码块中添加以下代码，将输出文本设置为蓝色（可自行替换颜色值，比如gray、red）：

knitr::knit_hooks$set(output = function(x, options) {
  # 借助LaTeX的textcolor命令为输出着色
  paste0("\\textcolor{blue}{", x, "}")
})

若LaTeX环境未加载xcolor包，需在文档开头插入LaTeX代码：

\usepackage{xcolor}

方法2：自定义LaTeX代码高亮样式 #

如果需要更精细控制代码元素（关键字、注释）的颜色，可先在文档开头插入LaTeX代码定义样式，再配合钩子设置输出颜色：

\usepackage{xcolor}
% 定义颜色变量
\definecolor{code_keyword}{rgb}{0.58,0,0.82} % 关键字用紫色
\definecolor{code_comment}{rgb}{0,0.6,0}     % 注释用绿色
\definecolor{output_color}{rgb}{0.4,0.4,0.4} % 输出用灰色

% 设置代码块整体样式
\lstdefinestyle{custom_code}{
    basicstyle=\ttfamily\footnotesize,
    keywordstyle=\color{code_keyword},
    commentstyle=\color{code_comment},
    backgroundcolor=\color{gray!5} % 代码块浅灰背景
}
\lstset{style=custom_code}

再用钩子指定输出颜色：

knitr::knit_hooks$set(output = function(x, options) {
  paste0("\\textcolor{output_color}{", x, "}")
})

二、无法修改颜色时的分隔方案 #

方法1：给输出块添加边框 #

通过钩子给输出包裹LaTeX的framed环境，生成带边框的独立区域：

knitr::knit_hooks$set(output = function(x, options) {
  paste0("\\begin{framed}\\texttt{", x, "}\\end{framed}")
})

方法2：添加明确的分隔标识 #

在输出前添加醒目的文本标识，强化代码与输出的边界：

knitr::knit_hooks$set(output = function(x, options) {
  paste0("**--- 输出结果 ---**\n\n", x)
})

方法3：加大代码与输出的间距 #

通过钩子给输出前后添加空行，或用LaTeX调整全局行间距：

knitr::knit_hooks$set(output = function(x, options) {
  paste0("\n\n", x, "\n\n")
})

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