~ubuntu-branches/ubuntu/trusty/r-cran-vgam/trusty

« back to all changes in this revision

Viewing changes to man/betageometric.Rd

  • Committer: Package Import Robot
  • Author(s): Chris Lawrence
  • Date: 2011-11-04 13:13:06 UTC
  • mfrom: (1.2.9)
  • mto: This revision was merged to the branch mainline in revision 14.
  • Revision ID: package-import@ubuntu.com-20111104131306-w9fd83i51rw60gxf
Tags: upstream-0.8-4
ImportĀ upstreamĀ versionĀ 0.8-4

Show diffs side-by-side

added added

removed removed

Lines of Context:
111
111
  \code{\link{betaff}},
112
112
  \code{\link{rbetageom}}.
113
113
 
 
114
 
114
115
}
115
116
\examples{
116
117
bg.data = data.frame(y = 0:11, wts = c(227,123,72,42,21,31,11,14,6,4,7,28))
117
 
fit  = vglm(y ~ 1, fam=betageometric, bg.data, weight=wts, trace=TRUE)
118
 
fitg = vglm(y ~ 1, fam=    geometric, bg.data, weight=wts, trace=TRUE)
119
 
coef(fit, matrix=TRUE)
 
118
fit  = vglm(y ~ 1, betageometric, bg.data, weight = wts, trace = TRUE)
 
119
fitg = vglm(y ~ 1,     geometric, bg.data, weight = wts, trace = TRUE)
 
120
coef(fit, matrix = TRUE)
120
121
Coef(fit)
121
 
diag(vcov(fit, untrans=TRUE))^0.5
 
122
sqrt(diag(vcov(fit, untransform = TRUE)))
122
123
fit@misc$shape1
123
124
fit@misc$shape2
124
125
# Very strong evidence of a beta-geometric:
125
 
pchisq(2*(logLik(fit)-logLik(fitg)), df=1, lower.tail=FALSE)
 
126
pchisq(2*(logLik(fit) - logLik(fitg)), df = 1, lower.tail = FALSE)
126
127
}
127
128
\keyword{models}
128
129
\keyword{regression}