# NOT RUN {
ll()
ll(all=TRUE)
ll("package:base")
ll("package:base", class="function", invert=TRUE)
data(infert)
ll(infert)
model <- glm(case~spontaneous+induced, family=binomial, data=infert)
ll(model, dim=TRUE)
ll(model, sort=TRUE)
ll(model$family)
# }
Run the code above in your browser using DataLab