#' Beer and blood alcohol content
#'
#' Here we examine data from sixteen student volunteers at Ohio State
#' University who each drank a randomly assigned number of cans of beer.
#'
#'
#' @name bac
#' @docType data
#' @format A data frame with 16 observations on the following 3 variables.
#' \describe{
#' \item{student}{a numeric vector}
#' \item{beers}{a numeric vector}
#' \item{bac}{a numeric vector}
#' }
#' @source J. Malkevitch and L.M. Lesser. For All Practical Purposes:
#' Mathematical Literacy in Today's World. WH Freeman & Co, 2008. The data
#' origin is given in the [Electronic Encyclopedia of Statistical Examples and Exercises](https://bcs.whfreeman.com/WebPub/Statistics/shared_resources/EESEE/BloodAlcoholContent/index.html), 1992.
#' @keywords datasets
#' @examples
#'
#' library(ggplot2)
#'
#' ggplot(bac, aes(x = beers, y = bac)) +
#' geom_point() +
#' labs(x = "Number of beers", y = "Blood alcohol content")
"bac"
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.