\usepackage{minted}

\begin{minted}{R}
x <- c(1,2,3,4,5)
\end{minted}