如何在Latex中高亮显示R语言代码

如何在Latex中高亮显示R语言代码,请看下面的示例:

\documentclass[8pt]{beamer}  
\usepackage{ctex}
\usepackage{listings} %插入代码
\usepackage{xcolor} %代码高亮
 
\lstset{numbers=left, %设置行号位置
        numberstyle=\tiny, %设置行号大小
        keywordstyle=\color{blue}, %设置关键字颜色
        commentstyle=\color[cmyk]{1,0,1,0}, %设置注释颜色
        frame=single, %设置边框格式
        escapeinside=``, %逃逸字符(1左面的键)，用于显示中文
        %breaklines, %自动折行
        extendedchars=false, %解决代码跨页时，章节标题，页眉等汉字不显示的问题
        xleftmargin=2em,xrightmargin=2em, aboveskip=1em, %设置边距
        tabsize=4, %设置tab空格数
        showspaces=false %不显示空格
       }
% % % % % % % % % % % % % % % % % % % % % % % % % % %       
\begin{document}  
\begin{frame}[fragile] %must using [fragile]   
\begin{lstlisting}[language=R]
# 绘制图形
rmax <- 3
# 设置图形分行方式和图形空白边距,并保存原有的方式
op <- par(mfrow = c(rmax,1), mar = .1+ c(2,2,2,1))
for(r in 1:rmax){
  tstr <- sprintf("r=%d",r)
  ricker(0.005, r);title(tstr)
}
par(op) # 恢复默认图形页面设置
\end{lstlisting} 
\end{frame}  
  
\end{document}

结果如下: