bt.morissette.2020.Rd
It is proposed that increased fat content and genetic origin are potential explanatory factors for warmer temperature use in lake trout populations that experienced supplementation stocking during the last 20 years.
bt.morissette.2020
The data frame 375 × 18 contains the following columns:
id | character | identifier of individual fish |
lake | character | lake of capture |
stocking | logical | is this lake was stocked or not? Always yes (O) |
ecotype | character | ecotype of the lake trout in this lake, always planktivorous (P) |
sex | character | sex of the fish; either male (M) or female (F) |
maturity | character | maturity status of the fish; mature or immature |
origin | character | genetic origin of the fish, determined by genomics; either natural (N), Local (L), Hybrid (H) or stocked (E) |
analysis | character | unique identifier of the SIMS analysis |
material | character | unique identifier of the analyzed otolith |
date | character | date of the analyses |
d18ovsmow_oto | numeric | otolith oxygen 18 isotopic value (permil) relative to the Vienna International Mean Ocean Water (VSMOW) standard |
d18ovpdb_oto | numeric | otolith oxygen 18 isotopic value (permil) relative to the Vienna Pee Dee Belemnite (VPDB) standard |
corrected_d18ovpdb_oto | numeric | oxygen 18 isotopic value (permil) relative to the Vienna Pee Dee Belemnite (VPDB) standard on which the -1 correction have been applied |
distance_oto | numeric | distance from the core of the otolith (um) of the SIMS analyse |
age | numeric | age (as a continuous variable) of fish at the SIMS analysis location |
age_int | integer | age (as an integer) of fish at the SIMS analysis location |
age | numeric | age (as a continuous variable) of fish at the SIMS analysis location |
TL | integer | total length (in mm) at the time of capture of the fish |
weight | integer | mass (in gram) at the time of capture of the fish |
The dataset contains otolith d18O thermometry within supplemented lake trout (Salvelinus namaycush) populations.
Instrument: SIMS (secondary ion mass spectrometer)
Morissette, O., Bernatchez, L., Wiedenbeck, M., & Sirois, P. (2020). Deciphering lifelong thermal niche using otolith δ18O thermometry within supplemented lake trout (Salvelinus namaycush) populations. Freshwater Biology, 65(6), 1114-1127. https://doi.org/10.1111/fwb.13497
Data availability are available at https://doi.org/10.5061/dryad.xgxd254cp
Traversing the paper's information via Semantic Scholar ID 51e034239ddc7c74089a97274178ed67f72f5bef
using S2miner package
otolith, stable isotope, d18O
### copy data into 'dat'
dat <- bt.morissette.2020
tibble::tibble(dat)
#> # A tibble: 375 × 18
#> id lake stocking ecotype sex maturity origin analysis material date d18ovsmow_oto
#> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <dbl>
#> 1 Louisa2012-02SD louisa O P fema… immature L A-0@1 LOU-02 17-1… 21.9
#> 2 Louisa2012-02SD louisa O P fema… immature L A-0@2 LOU-02 17-1… 23.6
#> 3 Louisa2012-02SD louisa O P fema… immature L A-0@3 LOU-02 17-1… 21.3
#> 4 Louisa2012-02SD louisa O P fema… immature L A-0@4 LOU-02 17-1… 21.3
#> 5 Louisa2012-02SD louisa O P fema… immature L A-0@5 LOU-02 17-1… 22.2
#> 6 Louisa2012-02SD louisa O P fema… immature L A-0@6 LOU-02 17-1… 23.1
#> 7 Louisa2012-02SD louisa O P fema… immature L A-0@7 LOU-02 17-1… 21.9
#> 8 Louisa2012-02SD louisa O P fema… immature L A-0@8 LOU-02 17-1… 22.6
#> 9 Louisa2012-02SD louisa O P fema… immature L A-0@9 LOU-02 17-1… 22.6
#> 10 Louisa2012-02SD louisa O P fema… immature L A-1@0 LOU-02 17-1… 22.4
#> # ℹ 365 more rows
#> # ℹ 7 more variables: d18ovpdb_oto <dbl>, corrected_d18ovpdb_oto <dbl>, distance_oto <dbl>,
#> # age <dbl>, age_int <int>, tl <int>, weight <int>
if (FALSE) {
### loading packages
library(dplyr)
library(ggplot2)
### d18O profile figure
ggplot(data = dat,aes(distance_oto, corrected_d18ovpdb_oto))+
geom_line(aes(col = sex, group = id),show.legend = F,linewidth = 0.02, na.rm = T)+
facet_grid(.~ sex)+
labs(
x = (expression(paste("Distance from the core of the otolith (", mu, "m)", sep = ""))),
y = (expression(paste("Corrected otolith ",delta^18*O," (‰)")))
)+
theme_bw() +
theme(
panel.grid.major = element_blank(), panel.grid.minor = element_blank(),
panel.background = element_blank(), axis.line = element_line(colour = "black"),
text = element_text(size = 10), legend.title = element_blank(),
plot.title = element_text(face = "bold")
)
}