[R] Extracting parameters for Gamma Distribution

[yongchuan]

I'm doing a cox regression with frailty:

model <- coxph(Surv(Start,Stop,Terminated)~ X + frailty(id),table)

I understand that model$frail returns the group level frailty 
terms. Does this mean this is the average of the frailty 
values for the respective groups? Also, if I'm fitting it to
a gamma frailty, how do I extract the rate and scale 
parameters for the different gamma distributions fit to each
group? Thanks.

Yongchuan