The R Project SVN R

Rev

Rev 81944 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 81944 Rev 84026
Line 129... Line 129...
129
> summary(fm1 <- glm(lot1 ~ log(u), data = clotting, family = Gamma))
129
> summary(fm1 <- glm(lot1 ~ log(u), data = clotting, family = Gamma))
130
 
130
 
131
Call:
131
Call:
132
glm(formula = lot1 ~ log(u), family = Gamma, data = clotting)
132
glm(formula = lot1 ~ log(u), family = Gamma, data = clotting)
133
 
133
 
134
Deviance Residuals: 
-
 
135
     Min        1Q    Median        3Q       Max  
-
 
136
-0.04008  -0.03756  -0.02637   0.02905   0.08641  
-
 
137
 
-
 
138
Coefficients:
134
Coefficients:
139
              Estimate Std. Error t value Pr(>|t|)    
135
              Estimate Std. Error t value Pr(>|t|)    
140
(Intercept) -0.0165544  0.0009275  -17.85 4.28e-07 ***
136
(Intercept) -0.0165544  0.0009275  -17.85 4.28e-07 ***
141
log(u)       0.0153431  0.0004150   36.98 2.75e-09 ***
137
log(u)       0.0153431  0.0004150   36.98 2.75e-09 ***
142
---
138
---
Line 153... Line 149...
153
> summary(fm2 <- glm(lot2 ~ log(u), data = clotting, family = Gamma))
149
> summary(fm2 <- glm(lot2 ~ log(u), data = clotting, family = Gamma))
154
 
150
 
155
Call:
151
Call:
156
glm(formula = lot2 ~ log(u), family = Gamma, data = clotting)
152
glm(formula = lot2 ~ log(u), family = Gamma, data = clotting)
157
 
153
 
158
Deviance Residuals: 
-
 
159
     Min        1Q    Median        3Q       Max  
-
 
160
-0.05574  -0.02925   0.01030   0.01714   0.06371  
-
 
161
 
-
 
162
Coefficients:
154
Coefficients:
163
              Estimate Std. Error t value Pr(>|t|)    
155
              Estimate Std. Error t value Pr(>|t|)    
164
(Intercept) -0.0239085  0.0013265  -18.02 4.00e-07 ***
156
(Intercept) -0.0239085  0.0013265  -18.02 4.00e-07 ***
165
log(u)       0.0235992  0.0005768   40.91 1.36e-09 ***
157
log(u)       0.0235992  0.0005768   40.91 1.36e-09 ***
166
---
158
---