Here you will find a number of derived data products related to the IYS.

1 Interactive Maps

1.1 NPAFC Interactive ArcGIS Map

See an interactive map of the IYS expedition data here

1.2 Canadian Integrated Ocean Observing System Data Explorer

See the CIOOS Data Explorer here and in the Datasets search bar enter ‘International Year of the Salmon’

2 Static Maps

If you click ‘code’ you can see the R code used to produce these plots. Feel free to copy the code and make edits yourself or contact brett.johnson@hakai.org for changes.

2.1 2022 Trawl Station Map Blue Bathymetry

library(ggOceanMaps)
library(tidyverse)

# Edit which vessels, years, or sampling event types you would like to plot
vessel <- c("TINRO", "NW", "Shimada", "Franklin", "Kaganovsky", "Legacy", "Raw_Spirit")
sampling_year <- c(2022)
#event_types could include "Trawl", "CTD" or "CTD-Rosette", "Gillnet"
event_types <- c("Trawl", "Gillnet")

# Update IYS_events.csv with newest version from https://github.com/international-year-of-the-salmon/IYS-Integrated-Data-Collection
iys_data <- read_csv("https://raw.githubusercontent.com/international-year-of-the-salmon/about/main/data/IYS_events.csv") |> 
  filter(vessel_name_abbr %in% vessel,
         year %in% sampling_year,
         event_type %in% event_types) |> 
  rename("Vessel" = "vessel_name_abbr") |> 
  mutate(Vessel = ifelse(Vessel == "NW", "NW Explorer", Vessel),
         Vessel = ifelse(Vessel == "Raw_Spirit", "Raw Spirit", Vessel))

bathymetric_station_map <- 
  basemap(data = iys_data,  rotate = TRUE, bathymetry = TRUE,
          lon.interval = 3) +

  geom_spatial_point(data = iys_data, aes(x = longitude_start_decdeg,
                                          y = latitude_start_decdeg, 
                                          colour = Vessel,
                     size = I(4)))+
  annotation_scale(location = "br") + 
  annotation_north_arrow(location = "tr", which_north = "true") +
  xlab("Longitude") + 
  ylab("Latitude")

bathymetric_station_map <- bathymetric_station_map +
  guides(fill = "none")

bathymetric_station_map

2.2 2022 Trawl Station Map Grey Bathymetry

library(ggOceanMaps)
library(tidyverse)

# Edit which vessels, years, or sampling event types you would like to plot
vessel <- c("TINRO", "NW", "Shimada", "Franklin", "Kaganovsky", "Legacy", "Raw_Spirit")
sampling_year <- c(2022)
#event_types could include "Trawl", "CTD" or "CTD-Rosette", "Gillnet"
event_types <- c("Trawl", "Gillnet")

# Update IYS_events.csv with newest version from https://github.com/international-year-of-the-salmon/IYS-Integrated-Data-Collection
iys_data <- read_csv("https://raw.githubusercontent.com/international-year-of-the-salmon/about/main/data/IYS_events.csv") |> 
  filter(vessel_name_abbr %in% vessel,
         year %in% sampling_year,
         event_type %in% event_types) |> 
  rename("Vessel" = "vessel_name_abbr") |> 
  mutate(Vessel = ifelse(Vessel == "NW", "NW Explorer", Vessel),
         Vessel = ifelse(Vessel == "Raw_Spirit", "Raw Spirit", Vessel))

bathymetric_station_map <- 
  basemap(data = iys_data,  rotate = TRUE, bathymetry = TRUE, bathy.style = "poly_greys",
          lon.interval = 3) +
  geom_spatial_point(data = iys_data, aes(x = longitude_start_decdeg,
                                          y = latitude_start_decdeg, 
                                          colour = Vessel,
                     size = I(4)))+
  annotation_scale(location = "br") + 
  annotation_north_arrow(location = "tr", which_north = "true") +
  xlab("Longitude") + 
  ylab("Latitude")

bathymetric_station_map + guides(fill="none") # Removes bathymetry scale legend

2.3 2022 Trawl Station Map Viridis Bathymetry

library(ggOceanMaps)
library(tidyverse)

# Edit which vessels, years, or sampling event types you would like to plot
vessel <- c("TINRO", "NW", "Shimada", "Franklin", "Kaganovsky", "Legacy", "Raw_Spirit")
sampling_year <- c(2022)
#event_types could include "Trawl", "CTD" or "CTD-Rosette", "Gillnet"
event_types <- c("Trawl", "Gillnet")

# Update IYS_events.csv with newest version from https://github.com/international-year-of-the-salmon/IYS-Integrated-Data-Collection
iys_data <- read_csv("https://raw.githubusercontent.com/international-year-of-the-salmon/about/main/data/IYS_events.csv") |> 
  filter(vessel_name_abbr %in% vessel,
         year %in% sampling_year,
         event_type %in% event_types) |> 
  rename("Vessel" = "vessel_name_abbr") |> 
  mutate(Vessel = ifelse(Vessel == "NW", "NW Explorer", Vessel),
         Vessel = ifelse(Vessel == "Raw_Spirit", "Raw Spirit", Vessel))

bathymetric_station_map <- 
  basemap(data = iys_data,  rotate = TRUE, bathymetry = TRUE,
          lon.interval = 3) +
  geom_spatial_point(data = iys_data, aes(x = longitude_start_decdeg,
                                          y = latitude_start_decdeg, 
                                          colour = Vessel,
                     size = I(4)))+
  annotation_scale(location = "br") + 
  annotation_north_arrow(location = "tr", which_north = "true") +
  xlab("Longitude") + 
  ylab("Latitude") 

bathymetric_station_map +guides(fill="none") + # Removes bathymetry scale legend
  scale_fill_viridis_d()

3 Global Ocean Physics Analysis

These models are courtesy of Tetjana Ross (Tetjana.Ross@dfo-mpo.gc.ca) from Fisheries and Oceans Canada. You must contact Tetjana and offer collaboration/co-authorship to use these images for publication.

Data Products