Code
scat_table1 %>%
gt(rowname_col = "Species") %>%
cols_label(count ~ "Count") %>%
tab_header(title = "California poopies",
subtitle = "Morphometric data on scat") %>%
tab_source_note(md("**Source**: Reid, R. E. B. (2015). A morphometric modeling approach to distinguishing among bobcat, coyote and gray fox scats. *Wildlife Biology*, 21(5), 254-262")) %>%
tab_spanner(label = "Physical averages",
columns = Length:Mass) %>%
tab_stubhead(label = "Species")| California poopies | ||||||
|---|---|---|---|---|---|---|
| Morphometric data on scat | ||||||
| Species |
Physical averages
|
d13C | d15N | Count | ||
| Length | Diameter | Mass | ||||
| bobcat | 9.3 | 19.0 | 12.5 | -27.7 | 6.4 | 57 |
| coyote | 9.6 | 20.3 | 18.2 | -24.8 | 10.4 | 28 |
| gray_fox | 9.0 | 15.0 | 5.6 | -27.3 | 6.5 | 25 |
| Source: Reid, R. E. B. (2015). A morphometric modeling approach to distinguishing among bobcat, coyote and gray fox scats. Wildlife Biology, 21(5), 254-262 | ||||||