[R] dumping the summary of lm to a text file

[Adrian Dragulescu]

Hello list,

I have a linear regression

 ctl    <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
 trt    <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
 group  <- gl(2,10,20, labels=c("Ctl","Trt"))
 weight <- c(ctl, trt)
 reg    <- lm(weight ~ group)

 sreg   <- summary(reg)

and I would like to dump exactly what I see on the console with
print(sreg) to a text file.  I've tried using cat but it did not work.
I've read the list questions but I did not see a solution.

Can you help with this?

Thank you,
Adrian Dragulescu