\documentclass[a4paper]{article}
\usepackage{Sweave}

\begin{document}

This is some text.

<<>>=
n <- 20
@ 

<<>>=
sum(1 : n)
@

And now a plot:

<<fig=true>>=
plot(1 : n)
@ 

\end{document}