documentclass{article}
usepackage[ngerman]{babel}
usepackage[utf8]{inputenc}

begin{document}

ä ö ü Ä Ö Ü ß

<<>>=
options(encoding = "UTF-8")
runif(5)
@

end{document}