Using the LaTeX listings package to style R PDF reports with knitr and pandoc

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

This article was first published on Tyler Smith » r, and kindly contributed to R-bloggers)

knitr is a an R package that allows you to include R code in markdown or LaTeX source files, and have the code and/or its output included in the resulting html or pdf files. RStudio provides good support for this, so if you want to try it out that’s a good place to start. This post assumes you’ve got everything installed and working, and want to customize the pdf output via LaTeX.

I’ve been working with this for a week or two, and the one hitch that I’ve run into is generating a nice pdf directly from the source Rmd file. For example, working from this source file, in the Rmd or R-markdown format:

1. ```{r, include = FALSE}
   
2. ## setup knitr and display options
   
3. library(knitr)
   
4. opts_chunk$set(comment=NA)
   
5. ```
   
6. 
   
7. Test document
   
8. ==
   
9. 
   
10. Code with Output
    
11. --
    
12. 
    
13. Here's a bit of R code:
    
14. 
    
15. ```{r code-output}
    
16. summary(lm(Petal.Length ~ Species, data = iris))
    
17. ```

复制代码

By default, the R code and the output it produces are included in thedocument.

Generating html is easy. From within R, just call knit2html("example.Rmd"). This produces a self-contained, nicely highlighted html file. Even easier from Rstudio, just click the ‘knit to html’ button.

Getting to pdf requires one more step. knit2html("example.Rmd")created two new files, one in markdown: example.md, and the target html: example.html. The markdown file can be converted to pdf with pandoc("example.md", format = "latex").

(if you don’t need html output, you can use knit("example.Rmd")instead of knit2html)

This calls pandoc behind the scenes to do the conversion. You can now view your output in a pdf viewer. The R source code and output has a different font and a bit of highlighting, but are not otherwise set off from the surrounding code.

I’m preparing R tutorials, and want to visually distinguish my instructions, the R code, and the associated output. The pandocdefault doesn’t quite cut it here.

Leaving R for the command line, we can try the pandoc highlight-style options. I like tango:

1. pandoc example.md -o example.pdf --highlight-style=tango

复制代码

This shades the R source code, but the output is unchanged. Not quite what I’m after:

It seems like the highlight-styles ought to be customizable, but I haven’t figure that out yet.

Pandoc provides one further option, using the LaTeX Listings package. Listings provides lots of different options for customizing the presentation and highlighting of code blocks in latex output. With listings I’ll be able to add boxes and shading to the code chunks with a custom template for the file.

However, before I can do that, I need to fix one small shortcoming of the Pandoc LaTeX output. When Pandoc uses the --listingsoption on our example.md file:

1. pandoc example.md -o example.tex --listings

复制代码

The resulting latex is marked up like this:

1. \begin{lstlisting}[language=R]
   
2. summary(lm(Petal.Length ~ Species, data = iris))
   
3. \end{lstlisting}
   
4. 
   
5. \begin{lstlisting}
   
6. 
   
7. Call:
   
8. lm(formula = Petal.Length ~ Species, data = iris)

复制代码

Note that the R source code has the language option set to R, but the output has no options set at all. There’s no way to style these two environments differently in LaTeX. To do that, we need to apply a style to one or the other of these listings. I haven’t found any way to accomplish this using knitr or pandoc, so I now pipe the pandoc output through sed to get this done:

1. pandoc example.md -o example.tex -s --listings
   
2. 
   
3. # add lstlisting style options
   
4. sed -i 's/{lstlisting}\[language=R\]/{lstlisting}[language=R,style=Rcode]/g' \
   
5. example.tex

复制代码

Almost there. Now the listings styles are applied, but the style needs to be defined in the document template. Pandoc templates are stored in ~/.pandoc/templates. The default latex template is available with the command pandoc -D latex. So I created a new template:

pandoc -D latex > ~/.pandoc/templates/ty.latex

Now I can place the listings style info directly into ty.latex:

1. \documentclass[$if(fontsize)$fontsize$,$endif$if(lang)$lang$,$endif$if(papersize)$papersize$,$endif$for(classoption)$classoption$sep$,$endfor$]{$documentclass$}
   
2. \usepackage[T1]{fontenc}
   
3. \usepackage{tgschola}
   
4. \usepackage{DejaVuSansMono}                  % monospace font for code
   
5. \usepackage{amssymb,amsmath}
   
6. \usepackage{fixltx2e} % provides \textsubscript
   
7. 
   
8. \usepackage[margin=1in]{geometry} % document size
   
9. \usepackage{natbib}               % reference style
   
10. \bibpunct{(} {)} {;} {a} {} {,}   % citation formatting
    
11. 
    
12. $if(listings)$
    
13. \usepackage{listings}
    
14. \usepackage[dvipsnames]{xcolor}
    
15. \lstset{frame=single,commentstyle=\color{BrickRed},columns=fixed,basicstyle=\ttfamily,
    
16. stringstyle=\color{Red},keepspaces=true,showstringspaces=false,
    
17. numbers=none}
    
18. \lstdefinestyle{Rcode}{backgroundcolor=\color[gray]{0.95}}
    
19. $endif$

复制代码

Check the documentation for listings to see all the options. The code here sets the default options for the R blocks (source and output), including boxing and colouring strings and comments. In addition, R source code blocks will be shaded gray; the background of the output remains white.

This is just the head of the file; the rest of it is unchanged from the default. I don’t understand all the options, so I’ll leave them alone for now. I did change the fonts to tgschola for the body, DejaVuSansMono for the code chunks, and added my standard geometry and natbib options. I haven’t used this template with references yet, so that may need tweaking.

With the template in place, I can now generate a pdf with my preferred formatting directly from the source Rmd, using the following script:

1. Rscript -e 'args <- commandArgs(trailingOnly = TRUE) ; library(knitr) ; knit(args[1])' $fullname
   
2. # md -> tex
   
3. pandoc $filename.md -o $filename.tex --template=ty --listings
   
4. # add lstlisting style options
   
5. sed -i 's/{lstlisting}\[language=R\]/{lstlisting}[language=R,style=Rcode]/g' \
   
6. $filename.tex
   
7. # tex -> pdf
   
8. texi2pdf $filename.tex

复制代码

The first line just bundles up the knitr call, using Rscript to run a self-contained R session for the processing. Next, we use pandoc to generate the LaTeX file. I use sed to add the style options, and finally call texi2pdf to generate the final document.

And here’s the result:

rmd2pdf.sh example.Rmd

That’s a fairly long and winding path to travel! Now that it’s done, I can use all the features of listings, and only need remember the simple R Markdown formatting for my day-to-day writing.

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：package Reports listing Report ports package reports style

thanks for sharing