如何将长引号(带有奇怪的字符)存储为字符串

Question

例如，我想存储下面的字符串(包括结束线)，但是我不知道这个函数是什么。我以为quote()会起作用：

mystring <- quote(
\documentclass{article}

\usepackage{graphicx}

\begin{document}

%\tableofcontents
\addcontentsline{toc}{chapter}{List of Figures}
\listoffigures

\newpage
\stepcounter{figure}
)

但没那么走运。

谢谢你，徐。

Answer 1

您需要转义反斜杠：

mystring <- "
\\documentclass{article}

\\usepackage{graphicx}

\\begin{document}

%\\tableofcontents
\\addcontentsline{toc}{chapter}{List of Figures}
\\listoffigures

\\newpage
\\stepcounter{figure}
"
cat(mystring)
#
# \documentclass{article}
#
# \usepackage{graphicx}
#
# \begin{document}
#
# %\tableofcontents
# \addcontentsline{toc}{chapter}{List of Figures}
# \listoffigures
#
# \newpage
# \stepcounter{figure}
#

# assuming your string is stored in "foo.txt"
mystring <- paste(readLines("foo.txt"), collapse="\n")