% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/data-lizard_run.R
\docType{data}
\name{lizard_run}
\alias{lizard_run}
\title{Lizard speeds}
\format{
A data frame with 48 observations on the following 3 variables.
\describe{
\item{top_speed}{Top speed of lizard, meters per second.}
\item{common_name}{Common name: \verb{Western fence lizard} and \verb{Sagebrush lizard}.}
\item{scientific_name}{Scientific name (Genus and species): \verb{Sceloporus occidentalis} and \verb{Sceloporus graciosus}.}
}
}
\source{
Adolph, S. C. 1987.  Physiological and behavioral ecology of the lizards
Sceloporus occidentalis and Sceloporus graciosus. Dissertation.
University of Washington, Seattle, Washington, USA.
}
\usage{
lizard_run
}
\description{
Data on top speeds measured on a laboratory race track for two species
of lizards: Western fence lizard (Sceloporus occidentalis) and
Sagebrush lizard (Sceloporus graciosus).
}
\examples{
library(ggplot2)
library(dplyr)

# Top speed by species
ggplot(lizard_run, aes(x = top_speed, color = common_name, fill = common_name)) +
  geom_density(alpha = 0.5)

# Top speed summary statistics by species
lizard_run |>
  group_by(common_name) |>
  summarise(
    n    = n(),
    mean = mean(top_speed),
    sd   = sd(top_speed)
  )
}
\keyword{datasets}
