The knitr package makes this relatively easy to do. See for example http://biostat.mc.vanderbilt.edu/KnitrHowto
Frank Marius Hofert-3 wrote > Dear expeRts, > > What's a 'good' (nice-looking, easy-to-read) setup for the LaTeX package > 'listings' to display R code? > > The two versions below are partly inspired by the settings of the package > SweaveListingUtils and > http://r.789695.n4.nabble.com/R-How-to-format-R-code-in-LaTex-documents-td816055.html > > Any suggestions, comments, or improvements are welcome. > > Cheers, > > Marius > > ### Version 1 > ################################################################## > > \documentclass{scrartcl} > > \usepackage[T1]{fontenc} > \usepackage[american]{babel} > > \usepackage{graphicx} > \usepackage{fancyvrb} > \usepackage{listings} > > \lstset{% setup listings > language=R,% set programming language > basicstyle=\small,% basic font style > keywordstyle=\bfseries,% keyword style > commentstyle=\ttfamily\itshape,% comment style > numbers=left,% display line numbers on the left side > numberstyle=\scriptsize,% use small line numbers > numbersep=10pt,% space between line numbers and code > tabsize=3,% sizes of tabs > showstringspaces=false,% do not replace spaces in strings by a certain > character > captionpos=b,% positioning of the caption below > breaklines=true,% automatic line breaking > escapeinside={(*}{*)},% escaping to LaTeX > fancyvrb=true,% verbatim code is typset by listings > extendedchars=false,% prohibit extended chars (chars of codes > 128--255) > > literate={"}{{\texttt{"}}}1{<-}{{$\leftarrow$}}1{<<-}{{$\twoheadleftarrow$}}1 > > {~}{{$\sim$}}1{<=}{{$\le$}}1{>=}{{$\ge$}}1{!=}{{$\neq$}}1{^}{{$^\wedge$}}1,% > item to replace, text, length of chars > alsoletter={.<-},% becomes a letter > alsoother={$},% becomes other > otherkeywords={!=, ~, $, *, \&, \%/\%, \%*\%, \%\%, <-, <<-, /},% > other keywords > deletekeywords={c}% remove keywords > } > > \begin{document} > > \noindent Just some text; see Line \ref{foo}. > \begin{lstlisting}[caption={A first example}, label=list:ex] > x <- c(1, 3, 2) > id <- function(x){ > x # just a dummy (*\label{foo}*) > } > 3 <= 4 > 3 != 4 > !TRUE > y <- "foo" > (pv <- sum(x*x^x)) > y ~ x + a > \end{lstlisting} > > \end{document} > > > ### Version 2 > ################################################################## > > \documentclass{scrartcl} > > \usepackage[T1]{fontenc} > \usepackage[american]{babel} > > \usepackage{graphicx} > \usepackage{fancyvrb} > \usepackage{listings} > \usepackage{bm} > \usepackage{xcolor} > > \xdefinecolor{gray}{rgb}{0.4,0.4,0.4} > \xdefinecolor{blue}{RGB}{58,95,205}% R's royalblue3; #3A5FCD > > \lstset{% setup listings > language=R,% set programming language > basicstyle=\ttfamily\small,% basic font style > keywordstyle=\color{blue},% keyword style > commentstyle=\color{gray},% comment style > numbers=left,% display line numbers on the left side > numberstyle=\scriptsize,% use small line numbers > numbersep=10pt,% space between line numbers and code > tabsize=3,% sizes of tabs > showstringspaces=false,% do not replace spaces in strings by a certain > character > captionpos=b,% positioning of the caption below > breaklines=true,% automatic line breaking > escapeinside={(*}{*)},% escaping to LaTeX > fancyvrb=true,% verbatim code is typset by listings > extendedchars=false,% prohibit extended chars (chars of codes > 128--255) > > literate={"}{{\texttt{"}}}1{<-}{{$\bm\leftarrow$}}1{<<-}{{$\bm\twoheadleftarrow$}}1 > > {~}{{$\bm\sim$}}1{<=}{{$\bm\le$}}1{>=}{{$\bm\ge$}}1{!=}{{$\bm\neq$}}1{^}{{$^{\bm\wedge}$}}1,% > item to replace, text, length of chars > alsoletter={.<-},% becomes a letter > alsoother={$},% becomes other > otherkeywords={!=, ~, $, \&, \%/\%, \%*\%, \%\%, <-, <<-, /},% > other keywords > deletekeywords={c}% remove keywords > } > > \begin{document} > > \noindent Just some text; see Line \ref{foo}. > \begin{lstlisting}[caption={A first example}, label=list:ex] > x <- c(1, 3, 2) > id <- function(x){ > x # just a dummy (*\label{foo}*) > } > 3 <= 4 > 3 != 4 > !TRUE > y <- "foo" > (pv <- sum(x*x^x)) > y ~ x + a > \end{lstlisting} > > \end{document} > > ______________________________________________ > R-help@ > mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide > http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. ----- Frank Harrell Department of Biostatistics, Vanderbilt University -- View this message in context: http://r.789695.n4.nabble.com/How-to-nicely-display-R-code-with-the-LaTeX-package-listings-tp4648110p4648149.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.