documentclass{exam}

usepackage{amsmath}
usepackage[formats]{listings}
lstset{ %
    language=R,
    basicstyle=footnotesizettfamily,
}

begin{document}
section{Homework}
%* actual homework questions *%

section{R Code}
lstinputlisting{file.r}

end{document}