Advertisement
Guest User

Untitled

a guest
Aug 26th, 2016
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.82 KB | None | 0 0
  1. eb1$bird_cnt <- eb1$Male + eb1$Female
  2.  
  3. summary(glm(bird_cnt ~ Region, data = eb1[eb1$DATE >= "2005-01-01",]))
  4.  
  5. Call:
  6. glm(formula = bird_cnt ~ Region + Month, data = eb1[eb1$DATE >= "2005-01-01", ])
  7.  
  8. Deviance Residuals:
  9. Min 1Q Median 3Q Max
  10. -0.40541 -0.24594 -0.16190 -0.01577 1.76026
  11.  
  12. Coefficients:
  13. Estimate Std. Error t value Pr(>|t|)
  14. (Intercept) 1.01577 0.08501 11.948 < 2e-16 ***
  15. RegionWEST -0.12613 0.06070 -2.078 0.03855 *
  16. MonthAugust 0.16911 0.12107 1.397 0.16345
  17. MonthDecember 0.13641 0.10872 1.255 0.21055
  18. MonthFebruary 0.25450 0.11875 2.143 0.03288 *
  19. MonthJanuary 0.22397 0.10932 2.049 0.04132 *
  20. MonthJuly 0.04157 0.15236 0.273 0.78518
  21. MonthJune 0.15991 0.15877 1.007 0.31464
  22. MonthMarch 0.14613 0.11059 1.321 0.18737
  23. MonthMay 0.01226 0.16225 0.076 0.93980
  24. MonthNovember 0.27872 0.10377 2.686 0.00763 **
  25. MonthOctober 0.35631 0.10715 3.325 0.00099 ***
  26. MonthSeptember 0.38964 0.11940 3.263 0.00122 **
  27. ---
  28. Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
  29.  
  30. (Dispersion parameter for gaussian family taken to be 0.1720771)
  31.  
  32. Null deviance: 57.879 on 321 degrees of freedom
  33. Residual deviance: 53.172 on 309 degrees of freedom
  34. AIC: 361.87
  35.  
  36. Number of Fisher Scoring iterations: 2
  37.  
  38. Call:
  39. glm(formula = bird_cnt ~ Region + Month, family = "poisson", data = eb1[eb1$DATE >= "2005-01-01", ])
  40.  
  41. Deviance Residuals:
  42. Min 1Q Median 3Q Max
  43. -0.36585 -0.22290 -0.15306 -0.01284 1.33480
  44.  
  45. Coefficients:
  46. Estimate Std. Error z value Pr(>|z|)
  47. (Intercept) 0.01281 0.20472 0.063 0.950
  48. RegionWEST -0.10741 0.13711 -0.783 0.433
  49. MonthAugust 0.15643 0.28058 0.558 0.577
  50. MonthDecember 0.12780 0.25589 0.499 0.617
  51. MonthFebruary 0.22705 0.27229 0.834 0.404
  52. MonthJanuary 0.20210 0.25377 0.796 0.426
  53. MonthJuly 0.03459 0.36665 0.094 0.925
  54. MonthJune 0.14555 0.36954 0.394 0.694
  55. MonthMarch 0.13644 0.25944 0.526 0.599
  56. MonthMay 0.01008 0.39106 0.026 0.979
  57. MonthNovember 0.24614 0.24109 1.021 0.307
  58. MonthOctober 0.30528 0.24541 1.244 0.214
  59. MonthSeptember 0.33203 0.26834 1.237 0.216
  60.  
  61. (Dispersion parameter for poisson family taken to be 1)
  62.  
  63. Null deviance: 41.040 on 321 degrees of freedom
  64. Residual deviance: 37.071 on 309 degrees of freedom
  65. AIC: 746.26
  66.  
  67. Number of Fisher Scoring iterations: 4
  68.  
  69. Call:
  70. glm(formula = bird_cnt ~ Region + Month, family = "quasipoisson", data = eb1[eb1$DATE >= "2005-01-01", ])
  71.  
  72. Deviance Residuals:
  73. Min 1Q Median 3Q Max
  74. -0.36585 -0.22290 -0.15306 -0.01284 1.33480
  75.  
  76. Coefficients:
  77. Estimate Std. Error t value Pr(>|t|)
  78. (Intercept) 0.01281 0.07582 0.169 0.865926
  79. RegionWEST -0.10741 0.05078 -2.115 0.035214 *
  80. MonthAugust 0.15643 0.10392 1.505 0.133284
  81. MonthDecember 0.12780 0.09477 1.348 0.178502
  82. MonthFebruary 0.22705 0.10085 2.251 0.025066 *
  83. MonthJanuary 0.20210 0.09399 2.150 0.032306 *
  84. MonthJuly 0.03459 0.13580 0.255 0.799133
  85. MonthJune 0.14555 0.13687 1.063 0.288410
  86. MonthMarch 0.13644 0.09609 1.420 0.156630
  87. MonthMay 0.01008 0.14484 0.070 0.944563
  88. MonthNovember 0.24614 0.08929 2.757 0.006189 **
  89. MonthOctober 0.30528 0.09089 3.359 0.000881 ***
  90. MonthSeptember 0.33203 0.09939 3.341 0.000938 ***
  91. ---
  92. Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
  93.  
  94. (Dispersion parameter for quasipoisson family taken to be 0.1371779)
  95.  
  96. Null deviance: 41.040 on 321 degrees of freedom
  97. Residual deviance: 37.071 on 309 degrees of freedom
  98. AIC: NA
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement