[R] Getting Pr from Summary(lm)

[David J. Netherway]

Hello,

I am trying to get the P values from the output of a summary for lm.

lm <- lm(y ~ age + sex)
s <- summary(lm)

I thought that I might be able to get them using a combination of scan, 
grep and sub.
But I got stuck on the first step - being able to process "s" as a text 
string.
I could perhaps write it to file than scan it back but there is probably 
an easier
way to do the whole thing.

Help would be welcome, David