R_WinEdt question

Hello,
I am new to R-WinEdt. Here is my code. If I don't want see output for 
summary(mp) in my final document, just want to run it.
How to modify these code?

Thanks,

Aimin Yan

<<R code,echo=FALSE>>=
library(MASS)
options(contrasts=c("contr.treatment","contr.poly"))
p5 <- read.csv("http://www.public.iastate.edu/~aiminy/data/p_5_2.csv")

p5 <- read.csv("http://www.public.iastate.edu/~aiminy/data/p_5_2.csv")
attach(p5)
mp<-glm(Y~P-1,data=p5)
summary(mp)
@