The R Project SVN R

Rev

Rev 59039 | Rev 67599 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 59039 Rev 61160
Line 46... Line 46...
46 
\value{The specified component of the model frame, usually a vector.}
 46 
\value{The specified component of the model frame, usually a vector.}
47 
 
 47 
 
48 
\seealso{\code{\link{model.frame}}, \code{\link{offset}}}
 48 
\seealso{\code{\link{model.frame}}, \code{\link{offset}}}
49 
 
 49 
 
50 
\examples{
 50 
\examples{
51 
a <- model.frame(cbind(ncases,ncontrols) ~ agegp+tobgp+alcgp, data=esoph)
 51 
a <- model.frame(cbind(ncases,ncontrols) ~ agegp + tobgp + alcgp, data = esoph)
52 
model.extract(a, "response")
 52 
model.extract(a, "response")
53 
stopifnot(model.extract(a, "response") == model.response(a))
 53 
stopifnot(model.extract(a, "response") == model.response(a))
54 
 
 54 
 
55 
a <- model.frame(ncases/(ncases+ncontrols) ~ agegp+tobgp+alcgp,
 55 
a <- model.frame(ncases/(ncases+ncontrols) ~ agegp + tobgp + alcgp,
56 
                 data = esoph, weights = ncases+ncontrols)
 56 
                 data = esoph, weights = ncases+ncontrols)
57 
model.response(a)
 57 
model.response(a)
58 
model.extract(a, "weights")
 58 
model.extract(a, "weights")
59 
 
 59 
 
60 
a <- model.frame(cbind(ncases,ncontrols) ~ agegp,
 60 
a <- model.frame(cbind(ncases,ncontrols) ~ agegp,