[R] extracting 'Z' value from a glm result

[Taka Matzmoto]

Hello R users
I like to extract z values for x1 and x2. I know how to extract coefficents 
using model$coef
but I don't know how to extract z values for each of independent variable. I 
looked around
using names(model) but I couldn't find how to extract z values.

Any help would be appreciated.

Thanks

TM

#########################################################
>summary(model)

Call:
glm(formula = y ~ x1+ x2, family = binomial)

Deviance Residuals:
    Min       1Q   Median       3Q      Max
-2.1397  -1.2357   0.6875   0.8517   1.5743

Coefficients:
              Estimate     Std. Error   z value   Pr(>|z|)
(Intercept) -0.63930    1.13045  -0.566    0.572
x1              0.69956    0.09459   7.396 1.40e-13 ***
x2              1.51389    1.13212   1.337    0.181
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

(Dispersion parameter for binomial family taken to be 1)

    Null deviance: 1214.9  on 999  degrees of freedom
Residual deviance: 1149.8  on 997  degrees of freedom
AIC: 1155.8

Number of Fisher Scoring iterations: 4
############################################################