Last updated: 2021-08-19

Checks: 7 0

Knit directory: emlr_obs_v_XXX/

This reproducible R Markdown analysis was created with workflowr (version 1.6.2). The Checks tab describes the reproducibility checks that were applied when the results were created. The Past versions tab lists the development history.


Great! Since the R Markdown file has been committed to the Git repository, you know the exact version of the code that produced these results.

Great job! The global environment was empty. Objects defined in the global environment can affect the analysis in your R Markdown file in unknown ways. For reproduciblity it’s best to always run the code in an empty environment.

The command set.seed(20200707) was run prior to running the code in the R Markdown file. Setting a seed ensures that any results that rely on randomness, e.g. subsampling or permutations, are reproducible.

Great job! Recording the operating system, R version, and package versions is critical for reproducibility.

Nice! There were no cached chunks for this analysis, so you can be confident that you successfully produced the results during this run.

Great job! Using relative paths to the files within your workflowr project makes it easier to run your code on other machines.

Great! You are using Git for version control. Tracking code development and connecting the code version to the results is critical for reproducibility.

The results in this page were generated with repository version eb50c9e. See the Past versions tab to see a history of the changes made to the R Markdown and HTML files.

Note that you need to be careful to ensure that all relevant files for the analysis have been committed to Git prior to generating the results (you can use wflow_publish or wflow_git_commit). workflowr only checks the R Markdown file, but you know if there are other scripts or data files that it depends on. Below is the status of the Git repository when the results were generated:


Ignored files:
    Ignored:    .Rhistory
    Ignored:    .Rproj.user/

Unstaged changes:
    Modified:   code/Workflowr_project_managment.R

Note that any generated files, e.g. HTML, png, CSS, etc., are not included in this status report because it is ok for generated content to have uncommitted changes.


These are the previous versions of the repository in which changes were made to the R Markdown (analysis/analysis_slab_inventory.Rmd) and HTML (docs/analysis_slab_inventory.html) files. If you’ve configured a remote Git repository (see ?wflow_git_remote), click on the hyperlinks in the table below to view the files as they were in that past version.

File Version Author Date Message
html 27c99b8 jens-daniel-mueller 2021-08-19 Build site.
html a03f2f0 jens-daniel-mueller 2021-08-18 Build site.
Rmd 3fdf621 jens-daniel-mueller 2021-08-18 test neighbouring trefs + auto slab correction
html 9335b31 jens-daniel-mueller 2021-08-10 Build site.
html 9943b45 jens-daniel-mueller 2021-08-10 Build site.
html 0b00a2b jens-daniel-mueller 2021-08-09 Build site.
html 755c6b1 jens-daniel-mueller 2021-08-09 Build site.
html cd8e0d5 jens-daniel-mueller 2021-08-06 Build site.
html 15773a0 jens-daniel-mueller 2021-08-06 included calculation of revelle factor
html da61d1a jens-daniel-mueller 2021-08-06 Build site.
html 340d731 jens-daniel-mueller 2021-08-06 Build site.
html 71546e4 jens-daniel-mueller 2021-08-06 test with stricter CANYON-B filtering
html 29444a1 jens-daniel-mueller 2021-08-05 Build site.
html 42e80c0 jens-daniel-mueller 2021-08-04 Build site.
html 48f6eed jens-daniel-mueller 2021-08-04 Build site.
html 1c597ab jens-daniel-mueller 2021-08-04 Build site.
Rmd 92bb6b3 jens-daniel-mueller 2021-08-04 test with intermediate CANYON-B offset threshold
html 81a46a4 jens-daniel-mueller 2021-08-03 Build site.
html b88c61b jens-daniel-mueller 2021-08-03 Build site.
html 0f0d5e5 jens-daniel-mueller 2021-08-03 Build site.
Rmd 4d7bb5a jens-daniel-mueller 2021-08-03 test rlm model fitting
html a53656d jens-daniel-mueller 2021-08-03 Build site.
html 88f7356 jens-daniel-mueller 2021-08-02 Build site.
html d759279 jens-daniel-mueller 2021-08-02 Build site.
html 127b801 jens-daniel-mueller 2021-07-24 Build site.
html 1f65ef1 jens-daniel-mueller 2021-07-23 Build site.
Rmd 56485c6 jens-daniel-mueller 2021-07-23 rebuild: complete revision
html 912d90e jens-daniel-mueller 2021-07-23 Build site.
html 2477316 jens-daniel-mueller 2021-07-23 rebuild: surface dcant mapping seperate
html 65770c4 jens-daniel-mueller 2021-07-23 Build site.
Rmd 36c4559 jens-daniel-mueller 2021-07-23 calculate slab dcant SD
html d3f92c8 jens-daniel-mueller 2021-07-23 Build site.
Rmd b599874 jens-daniel-mueller 2021-07-23 calculate slab dcant SD
html 48b8f54 jens-daniel-mueller 2021-07-23 Build site.
Rmd 0812056 jens-daniel-mueller 2021-07-23 calculate slab dcant SD
html c9ccc00 jens-daniel-mueller 2021-07-22 Build site.
html 426b2df jens-daniel-mueller 2021-07-21 Build site.
html 971ce87 jens-daniel-mueller 2021-07-13 Build site.
html 6122cd4 jens-daniel-mueller 2021-07-13 Build site.
html 491f6ab jens-daniel-mueller 2021-07-12 Build site.
Rmd b965038 jens-daniel-mueller 2021-07-12 complete revision
html 910d64a jens-daniel-mueller 2021-07-02 Build site.
html 1cbf907 jens-daniel-mueller 2021-07-02 Build site.
html 955f5dc jens-daniel-mueller 2021-06-29 Build site.
html 9480f94 jens-daniel-mueller 2021-06-29 Build site.
html 2e09c8e jens-daniel-mueller 2021-06-29 Build site.
Rmd 0d83393 jens-daniel-mueller 2021-06-29 revised plot obs grid per era
html 5d1e0e6 jens-daniel-mueller 2021-06-29 Build site.
Rmd b1ddea0 jens-daniel-mueller 2021-06-29 revised plot obs grid per era
html 9f60afb jens-daniel-mueller 2021-06-27 Build site.
Rmd c7771e2 jens-daniel-mueller 2021-06-27 plot obs grid per era
html e578ffa jens-daniel-mueller 2021-06-27 Build site.
Rmd fc40042 jens-daniel-mueller 2021-06-27 plot obs grid per era
html d054c39 jens-daniel-mueller 2021-06-24 Build site.
html 4fcd066 jens-daniel-mueller 2021-06-24 Build site.
html b960d93 jens-daniel-mueller 2021-06-24 Build site.
Rmd 79ecdc5 jens-daniel-mueller 2021-06-24 add observation grid to map
html aedd245 jens-daniel-mueller 2021-06-23 Build site.
Rmd 31bffa7 jens-daniel-mueller 2021-06-23 revised slab bias and write files
html f09cab9 jens-daniel-mueller 2021-06-23 Build site.
Rmd 3d3bfd4 jens-daniel-mueller 2021-06-23 plotted slab bias
html 3b6387f jens-daniel-mueller 2021-06-18 Build site.
html 3052a6c jens-daniel-mueller 2021-06-15 Build site.
html 3cb64bd jens-daniel-mueller 2021-06-15 Build site.
html c6b3da6 jens-daniel-mueller 2021-06-14 Build site.
html 48c73fc jens-daniel-mueller 2021-06-14 Build site.
html 439ee80 jens-daniel-mueller 2021-06-11 Build site.
html 33ffcab jens-daniel-mueller 2021-06-10 Build site.
html 7e1f407 jens-daniel-mueller 2021-06-10 Build site.
html 2cbe18c jens-daniel-mueller 2021-06-10 added zonal mean section control plots
html 69c79d0 jens-daniel-mueller 2021-06-08 Build site.
html 1772903 jens-daniel-mueller 2021-06-07 Build site.
html 594ed9a jens-daniel-mueller 2021-06-04 Build site.
html db7df0e jens-daniel-mueller 2021-06-04 rebuild without overlapping eras
html 2edc791 jens-daniel-mueller 2021-06-04 Build site.
html 207339d jens-daniel-mueller 2021-06-03 Build site.
html 315710b jens-daniel-mueller 2021-06-03 include anomalous changes
html be90356 jens-daniel-mueller 2021-06-02 Build site.
Rmd 12eeaa6 jens-daniel-mueller 2021-06-02 test run with beta version of GLODAPv2.2021
html d37a85d jens-daniel-mueller 2021-05-31 Build site.
html 4b7a5ee jens-daniel-mueller 2021-05-28 Build site.
html 12b455a jens-daniel-mueller 2021-05-27 Build site.
Rmd ee13efb jens-daniel-mueller 2021-05-27 optional source of local params fully implemented
html 8c736a6 jens-daniel-mueller 2021-05-27 Build site.
Rmd dc8e4e1 jens-daniel-mueller 2021-05-27 optional source of local params implemented
html 25bd183 jens-daniel-mueller 2021-05-26 Build site.
html b79cb2d jens-daniel-mueller 2021-05-20 Build site.
html 62bd574 jens-daniel-mueller 2021-05-20 Build site.
html 7c56c39 jens-daniel-mueller 2021-05-19 Build site.
html 0de759e jens-daniel-mueller 2021-05-13 Build site.
html 52e7583 jens-daniel-mueller 2021-05-12 Build site.
html 969e631 jens-daniel-mueller 2021-05-12 Build site.
html d2a83bc jens-daniel-mueller 2021-04-16 Build site.
html c0a47df jens-daniel-mueller 2021-04-16 Build site.
html 50290e8 jens-daniel-mueller 2021-04-16 overlapping eras
html a00ec94 jens-daniel-mueller 2021-04-16 Build site.
html b6fe355 jens-daniel-mueller 2021-04-16 Build site.
html 81b7c6d jens-daniel-mueller 2021-04-16 Build site.
html 0a6099c jens-daniel-mueller 2021-04-16 Build site.
html ddec5b7 jens-daniel-mueller 2021-04-15 Build site.
html 29edae5 jens-daniel-mueller 2021-04-14 Build site.
html 099d566 jens-daniel-mueller 2021-04-14 Build site.
html bb44686 jens-daniel-mueller 2021-04-14 Build site.
html bf40480 jens-daniel-mueller 2021-04-13 Build site.
html 9f31fe3 jens-daniel-mueller 2021-04-13 Build site.
html ce38853 jens-daniel-mueller 2021-04-13 Build site.
Rmd beaec17 jens-daniel-mueller 2021-04-13 included model data
html c98be84 jens-daniel-mueller 2021-04-13 Build site.
html 338dd3c jens-daniel-mueller 2021-04-09 Build site.
html a79ca2c jens-daniel-mueller 2021-04-09 included model data
html 7831fd3 jens-daniel-mueller 2021-04-09 Build site.
html 20b26d4 jens-daniel-mueller 2021-04-08 Build site.
html c0895f8 jens-daniel-mueller 2021-04-07 Build site.
html 4a05c7d jens-daniel-mueller 2021-04-07 Build site.
Rmd f5991e5 jens-daniel-mueller 2021-04-07 included model data
html e06bfa6 jens-daniel-mueller 2021-04-07 Build site.
Rmd fbf3ef9 jens-daniel-mueller 2021-04-07 included model data
html 488c4c1 jens-daniel-mueller 2021-04-07 Build site.
Rmd 36eab46 jens-daniel-mueller 2021-04-07 included model data

1 Version ID

The results displayed on this site correspond to the Version_ID: v_XXX

2 Data sources

dcant estimates from this sensitivity case:

  • Mean and SD per grid cell (lat, lon, depth)
  • Zonal mean and SD (basin, lat, depth)
  • Inventories (lat, lon)
dcant_3d <-
  read_csv(paste(path_version_data,
                 "dcant_3d.csv",
                 sep = ""))

dcant_3d_mod_truth <-
  read_csv(paste(path_version_data,
                 "dcant_3d_mod_truth.csv",
                 sep = ""))

dcant_3d <- bind_rows(dcant_3d,
                     dcant_3d_mod_truth)

tref <-
  read_csv(paste(path_version_data,
                 "tref.csv",
                 sep = ""))

Cleaned GLODAPv2_2020 file as used in this sensitivity case

GLODAP <-
  read_csv(paste(
    path_version_data,
    "GLODAPv2.2020_MLR_fitting_ready.csv",
    sep = ""
  ))

GLODAP_grid <- GLODAP %>% 
  distinct(lon, lat, gamma_slab, era)

GLODAP_grid <- GLODAP_grid %>% 
  group_by(lat, lon, gamma_slab) %>% 
  mutate(n = n()) %>% 
  ungroup() %>% 
  mutate(era_label = if_else(n==1, era, "both"))
dcant_slab <- dcant_3d %>%
  group_by(data_source) %>%
  nest() %>%
  mutate(slab = map(.x = data, ~ m_dcant_slab_concentration(.x))) %>%
  select(-data) %>%
  unnest(slab)

dcant_slab <- dcant_slab %>% 
  arrange(gamma_slab, data_source)

3 dcant - positive

In a first series of plots we explore the distribution of dcant, taking only positive estimates into account (positive here refers to the mean dcant estimate across MLR model predictions available for each grid cell). Negative values were set to zero before calculating mean sections and inventories.

Mean of positive dcant within each horizontal grid cell (lon x lat) per isoneutral slab.

Please note that:

  • density slabs covering values >28.1 occur by definition only either in the Atlantic or Indo-Pacific basin
  • gaps in the maps represent areas where (thin) density layers fit between discrete depth levels used for mapping

3.1 Absolute

dcant_slab %>%
  group_by(gamma_slab, data_source) %>%
  group_split() %>% 
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      subtitle_text = paste("data_source:", unique(.x$data_source),
                            "| Neutral density:", unique(.x$gamma_slab)),
      var = "dcant_pos"
      ) +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

3.2 Bias

dcant_slab_bias <- dcant_slab %>% 
  select(-c(layer_thickness, layer_volume, n_layer,
            dcant_pos_sd, dcant_sd)) %>% 
  pivot_wider(names_from = data_source,
              values_from = c("dcant", "dcant_pos")) %>% 
  mutate(dcant_bias = dcant_mod - dcant_mod_truth,
         dcant_pos_bias = dcant_pos_mod - dcant_pos_mod_truth) %>% 
  select(c(lat, lon, gamma_slab, ends_with("bias")))

dcant_slab_bias %>%
  group_split(gamma_slab) %>%
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      var = "dcant_pos_bias",
      col = "divergent",
      subtitle_text = paste("Neutral density:", unique(.x$gamma_slab))
    )  +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

4 dcant - all

In a second series of plots we explore the distribution of all dcant, taking positive and negative estimates into account.

Mean of all dcant within each horizontal grid cell (lon x lat) per isoneutral slab.

Please note that:

  • density slabs covering values >28.1 occur by definition only either in the Atlantic or Indo-Pacific basin
  • gaps in the maps represent areas where (thin) density layers fit between discrete depth levels used for mapping

4.1 Absolute

dcant_slab %>%
  group_by(gamma_slab, data_source) %>%
  group_split() %>% 
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      var = "dcant",
      col = "continuous",
      subtitle_text = paste(
        "data_source:",
        unique(.x$data_source),
        "| Neutral density:",
        unique(.x$gamma_slab)
      )
    )  +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

4.2 Bias

dcant_slab_bias %>%
  group_split(gamma_slab) %>%
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      var = "dcant_bias",
      col = "divergent",
      subtitle_text = paste("Neutral density:", unique(.x$gamma_slab))
    )  +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
65770c4 jens-daniel-mueller 2021-07-23
48b8f54 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

4.3 SD across models

dcant_slab %>%
  filter(data_source %in% c("mod", "obs")) %>% 
  group_by(gamma_slab, data_source) %>%
  group_split() %>% 
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      var = "dcant_sd",
      col = "continuous",
      subtitle_text = paste(
        "data_source:",
        unique(.x$data_source),
        "| Neutral density:",
        unique(.x$gamma_slab)
      ),
      breaks = c(seq(0,3,0.3), Inf)
    )  +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
d3f92c8 jens-daniel-mueller 2021-07-23

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
d3f92c8 jens-daniel-mueller 2021-07-23

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
d3f92c8 jens-daniel-mueller 2021-07-23

5 Depth levels

dcant_slab %>%
  group_by(gamma_slab, data_source) %>%
  group_split() %>% 
  head(3) %>%
  map(
    ~ p_map_dcant_slab(
      df = .x,
      title_text = "Number of depth levels within slab",
      subtitle_text = paste("data_source:", unique(.x$data_source),
                            "| Neutral density:", unique(.x$gamma_slab)),
      var = "n_layer"
      ) +
      geom_raster(
        data = GLODAP_grid %>% filter(gamma_slab == unique(.x$gamma_slab),
                                      era_label == "both"),
        aes(lon, lat), fill = "red") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[1]
        ),
        aes(lon, lat), fill = "grey50") +
      geom_raster(
        data = GLODAP_grid %>% filter(
          gamma_slab == unique(.x$gamma_slab),
          era_label == unique(tref$era)[2]
        ),
        aes(lon, lat),fill = "black")
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
0f0d5e5 jens-daniel-mueller 2021-08-03

[[2]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
0f0d5e5 jens-daniel-mueller 2021-08-03

[[3]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
0f0d5e5 jens-daniel-mueller 2021-08-03

6 Slab Budgets

dcant_slab_budget <- dcant_3d %>%
  group_by(data_source) %>%
  nest() %>%
  mutate(slab_budget = map(.x = data, ~ m_dcant_slab_budget(.x))) %>%
  select(-data) %>%
  unnest(slab_budget)

dcant_slab_budget %>% 
  ggplot(aes(data_source, dcant_pos, fill = gamma_slab)) +
  geom_col() +
  scale_fill_viridis_d(direction = -1) +
  facet_wrap(~ basin_AIP)

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12
910d64a jens-daniel-mueller 2021-07-02
1cbf907 jens-daniel-mueller 2021-07-02
955f5dc jens-daniel-mueller 2021-06-29
d054c39 jens-daniel-mueller 2021-06-24
4fcd066 jens-daniel-mueller 2021-06-24
3b6387f jens-daniel-mueller 2021-06-18
c6b3da6 jens-daniel-mueller 2021-06-14
439ee80 jens-daniel-mueller 2021-06-11
33ffcab jens-daniel-mueller 2021-06-10
7e1f407 jens-daniel-mueller 2021-06-10
2cbe18c jens-daniel-mueller 2021-06-10
69c79d0 jens-daniel-mueller 2021-06-08
1772903 jens-daniel-mueller 2021-06-07
594ed9a jens-daniel-mueller 2021-06-04
db7df0e jens-daniel-mueller 2021-06-04
2edc791 jens-daniel-mueller 2021-06-04
207339d jens-daniel-mueller 2021-06-03
315710b jens-daniel-mueller 2021-06-03
be90356 jens-daniel-mueller 2021-06-02
d37a85d jens-daniel-mueller 2021-05-31
4b7a5ee jens-daniel-mueller 2021-05-28
25bd183 jens-daniel-mueller 2021-05-26
62bd574 jens-daniel-mueller 2021-05-20
7c56c39 jens-daniel-mueller 2021-05-19
52e7583 jens-daniel-mueller 2021-05-12
969e631 jens-daniel-mueller 2021-05-12
d2a83bc jens-daniel-mueller 2021-04-16
c0a47df jens-daniel-mueller 2021-04-16
50290e8 jens-daniel-mueller 2021-04-16
a00ec94 jens-daniel-mueller 2021-04-16
b6fe355 jens-daniel-mueller 2021-04-16
81b7c6d jens-daniel-mueller 2021-04-16
0a6099c jens-daniel-mueller 2021-04-16
ddec5b7 jens-daniel-mueller 2021-04-15
29edae5 jens-daniel-mueller 2021-04-14
099d566 jens-daniel-mueller 2021-04-14
bb44686 jens-daniel-mueller 2021-04-14
bf40480 jens-daniel-mueller 2021-04-13
9f31fe3 jens-daniel-mueller 2021-04-13
ce38853 jens-daniel-mueller 2021-04-13
dcant_slab_budget %>% 
  ggplot(aes(data_source, dcant, fill = gamma_slab)) +
  geom_hline(yintercept = 0, col = "red") +
  geom_col() +
  scale_fill_viridis_d(direction = -1) +
  facet_wrap(~ basin_AIP)

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12
910d64a jens-daniel-mueller 2021-07-02
1cbf907 jens-daniel-mueller 2021-07-02
955f5dc jens-daniel-mueller 2021-06-29
d054c39 jens-daniel-mueller 2021-06-24
4fcd066 jens-daniel-mueller 2021-06-24
aedd245 jens-daniel-mueller 2021-06-23
3b6387f jens-daniel-mueller 2021-06-18
c6b3da6 jens-daniel-mueller 2021-06-14
439ee80 jens-daniel-mueller 2021-06-11
33ffcab jens-daniel-mueller 2021-06-10
7e1f407 jens-daniel-mueller 2021-06-10
2cbe18c jens-daniel-mueller 2021-06-10
69c79d0 jens-daniel-mueller 2021-06-08
1772903 jens-daniel-mueller 2021-06-07
594ed9a jens-daniel-mueller 2021-06-04
db7df0e jens-daniel-mueller 2021-06-04
2edc791 jens-daniel-mueller 2021-06-04
207339d jens-daniel-mueller 2021-06-03
315710b jens-daniel-mueller 2021-06-03
be90356 jens-daniel-mueller 2021-06-02
d37a85d jens-daniel-mueller 2021-05-31
4b7a5ee jens-daniel-mueller 2021-05-28
25bd183 jens-daniel-mueller 2021-05-26
62bd574 jens-daniel-mueller 2021-05-20
7c56c39 jens-daniel-mueller 2021-05-19
52e7583 jens-daniel-mueller 2021-05-12
969e631 jens-daniel-mueller 2021-05-12
d2a83bc jens-daniel-mueller 2021-04-16
c0a47df jens-daniel-mueller 2021-04-16
50290e8 jens-daniel-mueller 2021-04-16
a00ec94 jens-daniel-mueller 2021-04-16
b6fe355 jens-daniel-mueller 2021-04-16
81b7c6d jens-daniel-mueller 2021-04-16
0a6099c jens-daniel-mueller 2021-04-16
ddec5b7 jens-daniel-mueller 2021-04-15
29edae5 jens-daniel-mueller 2021-04-14
099d566 jens-daniel-mueller 2021-04-14
bb44686 jens-daniel-mueller 2021-04-14
bf40480 jens-daniel-mueller 2021-04-13
9f31fe3 jens-daniel-mueller 2021-04-13
ce38853 jens-daniel-mueller 2021-04-13
dcant_slab_budget %>% 
  ggplot(aes(data_source, dcant, fill = basin_AIP)) +
  geom_hline(yintercept = 0, col = "red") +
  geom_col() +
  scale_fill_viridis_d(direction = -1)

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12
aedd245 jens-daniel-mueller 2021-06-23
3b6387f jens-daniel-mueller 2021-06-18
c6b3da6 jens-daniel-mueller 2021-06-14
439ee80 jens-daniel-mueller 2021-06-11
33ffcab jens-daniel-mueller 2021-06-10
7e1f407 jens-daniel-mueller 2021-06-10
2cbe18c jens-daniel-mueller 2021-06-10
69c79d0 jens-daniel-mueller 2021-06-08
1772903 jens-daniel-mueller 2021-06-07
594ed9a jens-daniel-mueller 2021-06-04
db7df0e jens-daniel-mueller 2021-06-04
2edc791 jens-daniel-mueller 2021-06-04
207339d jens-daniel-mueller 2021-06-03
315710b jens-daniel-mueller 2021-06-03
be90356 jens-daniel-mueller 2021-06-02
d37a85d jens-daniel-mueller 2021-05-31
4b7a5ee jens-daniel-mueller 2021-05-28
25bd183 jens-daniel-mueller 2021-05-26
62bd574 jens-daniel-mueller 2021-05-20
7c56c39 jens-daniel-mueller 2021-05-19
52e7583 jens-daniel-mueller 2021-05-12
969e631 jens-daniel-mueller 2021-05-12
d2a83bc jens-daniel-mueller 2021-04-16
c0a47df jens-daniel-mueller 2021-04-16
50290e8 jens-daniel-mueller 2021-04-16
a00ec94 jens-daniel-mueller 2021-04-16
b6fe355 jens-daniel-mueller 2021-04-16
81b7c6d jens-daniel-mueller 2021-04-16
0a6099c jens-daniel-mueller 2021-04-16
ddec5b7 jens-daniel-mueller 2021-04-15
29edae5 jens-daniel-mueller 2021-04-14
099d566 jens-daniel-mueller 2021-04-14
bb44686 jens-daniel-mueller 2021-04-14
bf40480 jens-daniel-mueller 2021-04-13
9f31fe3 jens-daniel-mueller 2021-04-13
ce38853 jens-daniel-mueller 2021-04-13
dcant_slab_budget_bias <- dcant_slab_budget %>%
  filter(data_source %in% c("mod", "mod_truth")) %>%
  pivot_wider(names_from = data_source,
              values_from = c("dcant", "dcant_pos")) %>%
  mutate(dcant_bias = dcant_mod - dcant_mod_truth,
         dcant_pos_bias = dcant_pos_mod - dcant_pos_mod_truth) %>% 
  select(c(basin_AIP, gamma_slab, ends_with("bias")))

dcant_slab_budget_bias <- dcant_slab_budget_bias %>%
  mutate(gamma_slab = fct_relevel(gamma_slab,
                                ~sort(.x, decreasing = TRUE)))

dcant_slab_budget_bias %>% 
  ggplot(aes(gamma_slab, dcant_pos_bias)) +
  geom_col() +
  facet_grid(basin_AIP ~ ., scales = "free_y") +
  coord_flip()

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
1c597ab jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12
dcant_slab_budget_bias %>% 
  ggplot(aes(gamma_slab, dcant_bias)) +
  geom_col() +
  facet_grid(basin_AIP ~ ., scales = "free_y") +
  coord_flip()

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9335b31 jens-daniel-mueller 2021-08-10
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
755c6b1 jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
29444a1 jens-daniel-mueller 2021-08-05
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
1c597ab jens-daniel-mueller 2021-08-04
81a46a4 jens-daniel-mueller 2021-08-03
b88c61b jens-daniel-mueller 2021-08-03
a53656d jens-daniel-mueller 2021-08-03
88f7356 jens-daniel-mueller 2021-08-02
d759279 jens-daniel-mueller 2021-08-02
127b801 jens-daniel-mueller 2021-07-24
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
426b2df jens-daniel-mueller 2021-07-21
491f6ab jens-daniel-mueller 2021-07-12

7 Write files

dcant_slab_budget_bias %>%
  write_csv(paste0(path_version_data,
                   "dcant_slab_budget_bias.csv"))

dcant_slab_budget %>%
  write_csv(paste0(path_version_data,
                   "dcant_slab_budget.csv"))

dcant_slab_bias %>%
  write_csv(paste0(path_version_data,
                   "dcant_slab_bias.csv"))

dcant_slab %>%
  write_csv(paste0(path_version_data,
                   "dcant_slab.csv"))

8 Slab boundary depth

dcant_slab %>%
  group_by(gamma_slab, data_source) %>%
  group_split() %>%
  # head(1) %>%
  map(~ map  +
        geom_raster(data = .x,
                    aes(lon, lat, fill = layer_thickness)) +
        scale_fill_viridis_c() +
        labs(title = paste("Slab:", .x$gamma_slab,
                           "| Data source:", .x$data_source))
  )
[[1]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[2]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[3]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
42e80c0 jens-daniel-mueller 2021-08-04
48f6eed jens-daniel-mueller 2021-08-04
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
c9ccc00 jens-daniel-mueller 2021-07-22
491f6ab jens-daniel-mueller 2021-07-12

[[4]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[5]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[6]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
42e80c0 jens-daniel-mueller 2021-08-04
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[7]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[8]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[9]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[10]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[11]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[12]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[13]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[14]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[15]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[16]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[17]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[18]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[19]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[20]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[21]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[22]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[23]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[24]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[25]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[26]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[27]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[28]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[29]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[30]]

Version Author Date
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[31]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[32]]

Version Author Date
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[33]]

Version Author Date
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[34]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[35]]

Version Author Date
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[36]]

Version Author Date
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[37]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[38]]

Version Author Date
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[39]]

Version Author Date
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[40]]

Version Author Date
27c99b8 jens-daniel-mueller 2021-08-19
a03f2f0 jens-daniel-mueller 2021-08-18
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[41]]

Version Author Date
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12

[[42]]

Version Author Date
9943b45 jens-daniel-mueller 2021-08-10
0b00a2b jens-daniel-mueller 2021-08-09
cd8e0d5 jens-daniel-mueller 2021-08-06
15773a0 jens-daniel-mueller 2021-08-06
da61d1a jens-daniel-mueller 2021-08-06
340d731 jens-daniel-mueller 2021-08-06
71546e4 jens-daniel-mueller 2021-08-06
912d90e jens-daniel-mueller 2021-07-23
2477316 jens-daniel-mueller 2021-07-23
491f6ab jens-daniel-mueller 2021-07-12
# gamma field in Atl
predictors_gamma_Atl <- dcant_3d %>%
  select(data_source, basin_AIP, lat, lon, depth, gamma) %>% 
  filter(basin_AIP == "Atlantic") %>% 
  distinct()

# filter grid cells with at least two depth layers
predictors_gamma_Atl <- predictors_gamma_Atl %>%
  group_by(data_source, lat, lon) %>%
  mutate(n = n()) %>%
  ungroup() %>% 
  filter(n > 1) %>% 
  select(-n)

# 3D grid with Atl slab boundaries
slabs_Atl <- expand_grid(predictors_gamma_Atl %>% distinct(data_source, lat, lon),
                         gamma = params_local$slabs_Atl) %>% 
  mutate(basin_AIP = "flag")

# join slab boundary grid with gamma field
slabs_Atl_int <- full_join(slabs_Atl,
                           predictors_gamma_Atl) %>%
  arrange(lat, lon, gamma)

# interpolate depth to slab boundary
slabs_Atl_int <- slabs_Atl_int %>% 
  group_by(data_source, lat, lon) %>% 
  mutate(depth = approxfun(gamma, depth, rule = 1)(gamma)) %>% 
  ungroup()

# filter interpolated depths
slabs_Atl_int <- slabs_Atl_int %>% 
  filter(basin_AIP == "flag",
         !is.na(depth))

#### Indo-Pacific

# gamma field in Pac
predictors_gamma_Ind_Pac <- dcant_3d %>%
  select(data_source, basin_AIP, lat, lon, depth, gamma) %>% 
  filter(basin_AIP %in% c("Indian", "Pacific")) %>% 
  distinct()

# filter grid cells with at least two depth layers
predictors_gamma_Ind_Pac <- predictors_gamma_Ind_Pac %>%
  group_by(data_source, lat, lon) %>%
  mutate(n = n()) %>%
  ungroup() %>% 
  filter(n > 1) %>% 
  select(-n)

# 3D grid with Pac slab boundaries
slabs_Ind_Pac <- expand_grid(predictors_gamma_Ind_Pac %>% distinct(data_source, lat, lon),
                         gamma = params_local$slabs_Ind_Pac) %>% 
  mutate(basin_AIP = "flag")

# join slab boundary grid with gamma field
slabs_Ind_Pac_int <- full_join(slabs_Ind_Pac,
                           predictors_gamma_Ind_Pac) %>%
  arrange(lat, lon, gamma)

# interpolate depth to slab boundary
slabs_Ind_Pac_int <- slabs_Ind_Pac_int %>% 
  group_by(data_source, lat, lon) %>% 
  mutate(depth = approxfun(gamma, depth, rule = 1)(gamma)) %>% 
  ungroup()

# filter interpolated depths
slabs_Ind_Pac_int <- slabs_Ind_Pac_int %>% 
  filter(basin_AIP == "flag",
         !is.na(depth))


# join interpolated gamma depth
slabs <- bind_rows(slabs_Atl_int,
                   slabs_Ind_Pac_int) %>%
  select(-basin_AIP)

slabs <- inner_join(
  basinmask %>% select(lat, lon, basin_AIP) %>% distinct(),
  slabs)


map + 
  geom_raster(data = slabs,
              aes(lon, lat, fill = depth)) +
  facet_grid(gamma ~ data_source) +
  scale_fill_viridis_c(direction = -1)

rm(slabs_Atl, slabs_Atl_int, slabs_Ind_Pac, slabs_Ind_Pac_int)

sessionInfo()
R version 4.0.3 (2020-10-10)
Platform: x86_64-pc-linux-gnu (64-bit)
Running under: openSUSE Leap 15.2

Matrix products: default
BLAS:   /usr/local/R-4.0.3/lib64/R/lib/libRblas.so
LAPACK: /usr/local/R-4.0.3/lib64/R/lib/libRlapack.so

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=en_US.UTF-8       LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
 [1] gt_0.2.2         kableExtra_1.3.1 marelac_2.1.10   shape_1.4.5     
 [5] scales_1.1.1     ggforce_0.3.3    metR_0.9.0       scico_1.2.0     
 [9] patchwork_1.1.1  collapse_1.5.0   forcats_0.5.0    stringr_1.4.0   
[13] dplyr_1.0.5      purrr_0.3.4      readr_1.4.0      tidyr_1.1.3     
[17] tibble_3.1.3     ggplot2_3.3.5    tidyverse_1.3.0  workflowr_1.6.2 

loaded via a namespace (and not attached):
 [1] fs_1.5.0                 lubridate_1.7.9          gsw_1.0-5               
 [4] webshot_0.5.2            httr_1.4.2               rprojroot_2.0.2         
 [7] tools_4.0.3              backports_1.1.10         utf8_1.1.4              
[10] R6_2.5.0                 DBI_1.1.0                colorspace_2.0-2        
[13] withr_2.3.0              tidyselect_1.1.0         compiler_4.0.3          
[16] git2r_0.27.1             cli_3.0.1                rvest_0.3.6             
[19] xml2_1.3.2               labeling_0.4.2           checkmate_2.0.0         
[22] digest_0.6.27            rmarkdown_2.10           oce_1.2-0               
[25] pkgconfig_2.0.3          htmltools_0.5.0          highr_0.8               
[28] dbplyr_1.4.4             rlang_0.4.10             readxl_1.3.1            
[31] rstudioapi_0.13          farver_2.0.3             generics_0.1.0          
[34] jsonlite_1.7.1           magrittr_1.5             Matrix_1.2-18           
[37] Rcpp_1.0.5               munsell_0.5.0            fansi_0.4.1             
[40] lifecycle_1.0.0          stringi_1.5.3            whisker_0.4             
[43] yaml_2.2.1               MASS_7.3-53              grid_4.0.3              
[46] blob_1.2.1               parallel_4.0.3           promises_1.1.1          
[49] crayon_1.3.4             lattice_0.20-41          haven_2.3.1             
[52] hms_0.5.3                seacarb_3.2.14           knitr_1.33              
[55] pillar_1.6.2             reprex_0.3.0             glue_1.4.2              
[58] evaluate_0.14            RcppArmadillo_0.10.1.2.0 data.table_1.14.0       
[61] modelr_0.1.8             vctrs_0.3.8              tweenr_1.0.2            
[64] httpuv_1.5.4             testthat_2.3.2           cellranger_1.1.0        
[67] gtable_0.3.0             polyclip_1.10-0          assertthat_0.2.1        
[70] xfun_0.25                broom_0.7.9              RcppEigen_0.3.3.7.0     
[73] later_1.2.0              viridisLite_0.3.0        ellipsis_0.3.2          
[76] here_0.1