In jennybc/frogs: Data from the Calaveras Jumping Frog Jubilee

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-"
)

frogs

Data from the Calaveras Jumping Frog Jubilee, as collected for this paper:

Astley, H. C., Abbott, E. M., Azizi, E., Marsh, R. L., and Roberts, T. J. (2013) Chasing maximal performance: a cautionary tale from the celebrated jumping frogs of Calaveras County, Journal of Experimental Biology 216, 3947--3953. http://dx.doi.org/10.1242/jeb.090357

Maximal performance is an essential metric for understanding many aspects of an organism’s biology, but it can be difficult to determine because a measured maximum may reflect only a peak level of effort, not a physiological limit. We used a unique opportunity provided by a frog jumping contest to evaluate the validity of existing laboratory estimates of maximum jumping performance in bullfrogs (Rana catesbeiana). We recorded video of 3124 bullfrog jumps over the course of the 4-day contest at the Calaveras County Jumping Frog Jubilee, and determined jump distance from these images and a calibration of the jump arena. Frogs were divided into two groups: ‘rental’ frogs collected by fair organizers and jumped by the general public, and frogs collected and jumped by experienced, ‘professional’ teams. A total of 58% of recorded jumps surpassed the maximum jump distance in the literature (1.295 m), and the longest jump was 2.2 m. Compared with rental frogs, professionally jumped frogs jumped farther, and the distribution of jump distances for this group was skewed towards long jumps. Calculated muscular work, historical records and the skewed distribution of jump distances all suggest that the longest jumps represent the true performance limit for this species. Using resampling, we estimated the probability of observing a given jump distance for various sample sizes, showing that large sample sizes are required to detect rare maximal jumps. These results show the importance of sample size, animal motivation and physiological conditions for accurate maximal performance estimates.

DATA IS NOT CLEANED YET! Still under development.

Installation

You can install frogs from github with:

# install.packages("devtools")
devtools::install_github("jennybc/frogs")

Getting to know the frogs

At this point, all we know is that each row is one frog-jump. Frog ids coming ...

library(frogs)
library(tidyverse)

frogs
glimpse(frogs)

An early figure. Do frogs need to warm up? Do they fatigue? Yes and yes.

frogs2 <- frogs %>% 
  filter(jump_n < 7) %>% 
  mutate(
    jump_n = as.factor(as.integer(jump_n))
  )
ggplot(frogs2, aes(x = distance, color = jump_n)) +
  geom_density()

Do professional frog jumping teams get better results? YES.

ggplot(frogs, aes(x = distance, color = frog_type)) +
  geom_density()

jennybc/frogs documentation built on May 27, 2019, 7:26 a.m.