Analysis

  1. Open, save, and establish an R markdown document that includes a YAML header with your name, title, date and output as an html [1].

  2. Include an R chunk that loads tidyverse [1].

  3. Please download the data you see above by accessing this link. Read it in as CSV data and save it to an object named dat. [3]

dat <- read_csv("data/bite_force.csv")
## Rows: 20 Columns: 3
## ── Column specification ──────────────────────────────────
## Delimiter: ","
## chr (1): sex
## dbl (2): mass, Fmax
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
  1. Produce an illustrative visualization of the relationship between squirrel maximum bite force and mass and how this relationship may vary by sex. [3]
dat_F <- dat %>% filter(sex=="Female")
dat_M <- dat %>% filter(sex=="Male")
dat_F %>% 
  ggplot(aes(mass,Fmax))+geom_point()

dat_M %>% 
  ggplot(aes(mass,Fmax))+geom_point()

Interpretation

The relationship between bite force and mass is similar between males and females.