Использование \ newenvironment в rmarkdown

Question

Я пытаюсь создать среду в стиле кодовой книги в документе Rmarkdown, как показано ниже:

---
title: "Title"
author: "Author"
date: "`r Sys.Date()`"
output:
  pdf_document:
    fig_caption: yes
    fig_crop: yes
    keep_tex: no
    number_sections: yes
    citation_package: biblatex
  html_document:
    df_print: paged
header-includes:
- \usepackage[english]{babel}
- \usepackage[utf8]{inputenc}
- \usepackage{amsmath}
- \usepackage{graphicx}
- \usepackage{caption}
- \usepackage{physics}
- \usepackage{float}
- \usepackage{tocloft}
- \usepackage{inputenc}
- \usepackage{setspace}
- \usepackage{tabularx}
- \usepackage{lipsum}
- \usepackage{listings}
- \usepackage{wrapfig}
- \usepackage{mathtools}
- \usepackage{lscape}
- \usepackage{rotating}
- \usepackage{epstopdf}
- \usepackage{hyperref}
- \geometry{letterpaper, portrait, margin=1in}
- \hypersetup{colorlinks = false, linkbordercolor = {white}, citebordercolor = {white},
  urlbordercolor = {white}}
- \lstset{language=R, basicstyle=\small\ttfamily,stringstyle=\color{DarkGreen},otherkeywords={0,1,2,3,4,5,6,7,8,9},morekeywords={TRUE,FALSE},deletekeywords={data,frame,length,as,character}, keywordstyle=\color{blue}, commentstyle=\color{DarkGreen}}
fontsize: 14pt
---

\pagenumbering{arabic}

\doublespacing

\newpage

Defining function here:

\newlength\cbl
\newenvironment{codebook}[1][]{
    \settowidth{\cbl}{#1}
    \parskip1em plus .3em minus .2em
    \parindent0pt
    \def\code##1##2{{\bfseries ##1}\hfill
        \parbox[t]{\dimexpr\linewidth-15em-\cbl}{##2}\par}}{\noindent}

\newpage

\singlespacing

Testing out the environment here: 

\subsubsection{Codebook}
    
\begin{codebook}
  \code{country}{Country name.}
  \code{year}{Year of country observation.}
  \code{codename}{Country code (character).}
  \code{codenumber}{Country code (numeric).}
\end{codebook}

Я подтвердил, что \newenvironment код работает корректно в TeXstudio, но когда я пытаюсь связать этот документ с PDF, я получаю следующую ошибку:

! Undefined control sequence.
<argument> \code

Я предполагаю, что внутри \newenvironmentкоманда, которая не работает с синтаксисом rmarkdown. Любая помощь будет оценена.

Answer 1

Если вы установите keep_tex: yesв YAML вы можете получить подсказку о том, что пошло не так. Начиная с \subsubsection{Codebook}, вот увидишь

\subsubsection{Codebook}

\settowidth{\cbl}{\code}
    \parskip 1em plus .3em minus .2em
    \parindent 0pt
    \def\code#\code#

Случилось так, что Pandoc попытался обработать определение вашей среды вместо того, чтобы оставить его в покое. Вы можете заставить его игнорировать определение, введя его так:

```{=latex}
\newlength\cbl
\newenvironment{codebook}[1][rob\_avprison1]{
    \settowidth{\cbl}{#1}
    \parskip1em plus .3em minus .2em
    \parindent0pt
    \def\code##1##2{{\bfseries ##1}\hfill
        \parbox[t]{\dimexpr\linewidth-15em-\cbl}{##2}\par}}{\noindent}
```

В вашем минимальном примере этого кажется достаточно, но вам может потребоваться обернуть больше материала в реальном документе.