Last updated: 2021-02-16

Checks: 7 0

Knit directory: emlr_mod_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 716c041. 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:   data/auxillary/params_local.rds

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_cant_budgets.Rmd) and HTML (docs/analysis_cant_budgets.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 401eab3 Donghe-Zhu 2021-02-15 Build site.
html e3bba84 Donghe-Zhu 2021-02-15 Build site.
html 5dce4b1 Donghe-Zhu 2021-02-15 Build site.
html 4469a0c Donghe-Zhu 2021-02-13 Build site.
html 5ae6a69 Donghe-Zhu 2021-02-10 Build site.
html 05385dc Donghe-Zhu 2021-02-10 Build site.
html f791ae4 Donghe-Zhu 2021-02-09 Build site.
html f71ae34 Donghe-Zhu 2021-02-09 Build site.
html c011832 Donghe-Zhu 2021-02-09 Build site.
html a145fa7 Donghe-Zhu 2021-02-09 Build site.
html c344e42 Donghe-Zhu 2021-02-08 Build site.
html 2f095d7 Donghe-Zhu 2021-02-07 Build site.
html 2305044 Donghe-Zhu 2021-02-07 Build site.
html 1fad5f1 Donghe-Zhu 2021-02-07 Build site.
html ca03c39 Donghe-Zhu 2021-02-07 Build site.
html e2ffc14 Donghe-Zhu 2021-02-05 Build site.
html cd7c52c Donghe-Zhu 2021-02-04 Build site.
html bcf84f4 Donghe-Zhu 2021-02-02 Build site.
html a518739 Donghe-Zhu 2021-02-01 Build site.
html 61666de Donghe-Zhu 2021-01-31 Build site.
html 865b582 Donghe-Zhu 2021-01-31 Build site.
html 3e68089 Donghe-Zhu 2021-01-31 Build site.
html ecf335c Donghe-Zhu 2021-01-31 Build site.
html a618965 Donghe-Zhu 2021-01-31 Build site.
html 59e006e Donghe-Zhu 2021-01-31 Build site.
html a1c8f87 Donghe-Zhu 2021-01-31 Build site.
html ae5c18f Donghe-Zhu 2021-01-31 Build site.
html b50fe52 Donghe-Zhu 2021-01-31 Build site.
html ac99ae5 jens-daniel-mueller 2021-01-29 code review
html b5bdcaf Donghe-Zhu 2021-01-29 Build site.
html 442010d Donghe-Zhu 2021-01-29 Build site.
html 372adf5 Donghe-Zhu 2021-01-29 Build site.
html af8788e Donghe-Zhu 2021-01-29 Build site.
html 21c91c9 Donghe-Zhu 2021-01-29 Build site.
html eded038 Donghe-Zhu 2021-01-29 Build site.
html 541d4dd Donghe-Zhu 2021-01-29 Build site.
html 6a75576 Donghe-Zhu 2021-01-28 Build site.
html 16fba40 Donghe-Zhu 2021-01-28 Build site.
html 12bc567 Donghe-Zhu 2021-01-27 Build site.
html ceed31b Donghe-Zhu 2021-01-27 Build site.
html 342402d Donghe-Zhu 2021-01-27 Build site.
html 5bad5c2 Donghe-Zhu 2021-01-27 Build site.
html 61efb56 Donghe-Zhu 2021-01-25 Build site.
html 48f638e Donghe-Zhu 2021-01-25 Build site.
html c1cec47 Donghe-Zhu 2021-01-25 Build site.
html 05ffb0c Donghe-Zhu 2021-01-25 Build site.
html 8b97165 Donghe-Zhu 2021-01-25 Build site.
html c569946 Donghe-Zhu 2021-01-24 Build site.
html a2f0d56 Donghe-Zhu 2021-01-23 Build site.
html 28509fc Donghe-Zhu 2021-01-23 Build site.
html 4c28e4a Donghe-Zhu 2021-01-22 Build site.
html 24cc264 jens-daniel-mueller 2021-01-22 cleaned /docs before creating copies
html 88eb28f Donghe-Zhu 2021-01-21 Build site.
html 2679490 Donghe-Zhu 2021-01-21 Build site.
html 7891955 Donghe-Zhu 2021-01-21 Build site.
html d4cf1cb Donghe-Zhu 2021-01-21 Build site.
html 1f3e5b6 jens-daniel-mueller 2021-01-20 Build site.
html 0e7bdf1 jens-daniel-mueller 2021-01-15 cleaning template repository
html 73cbef3 jens-daniel-mueller 2021-01-15 Build site.
html 4571843 jens-daniel-mueller 2021-01-14 revision and html deleted for template copying
html 23151cd jens-daniel-mueller 2021-01-14 Build site.
Rmd 7bb99e3 Donghe-Zhu 2021-01-14 analysis reversion
html b3564aa jens-daniel-mueller 2021-01-14 Build site.
Rmd 88db051 jens-daniel-mueller 2021-01-14 local rebuild after revision
html 8d032c3 jens-daniel-mueller 2021-01-14 Build site.
Rmd 89bb194 jens-daniel-mueller 2021-01-13 local rebuild after revision
html 022871c Donghe-Zhu 2021-01-13 Build site.
Rmd d44f36f Donghe-Zhu 2021-01-13 reorder analysis final
html 17dee1d jens-daniel-mueller 2021-01-13 Build site.
Rmd ca5ba13 Donghe-Zhu 2021-01-13 reorder the analysis

1 Data sources

Following Cant column inventories are used:

1.1 This study

Results from this study are referred to as JDM.

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

1.2 Model Cant

“True” Cant fields directly inferred from the model output are referred to as M.

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

1.3 Join data sets

Inventories are merged, and differences calculate per grid cell and per eras.

# add estimate label
cant_inv_long <- bind_rows(cant_inv_JDM %>%  mutate(estimate = "JDM"),
                           cant_inv_M %>%  mutate(estimate = "M"))

# pivot to wide format
cant_inv_wide <- cant_inv_long %>%
  pivot_wider(names_from = estimate, values_from = cant_pos_inv:cant_inv)

# calculate offset
cant_inv_wide <- cant_inv_wide %>%
  mutate(
    cant_pos_inv_offset = cant_pos_inv_JDM - cant_pos_inv_M,
    cant_inv_offset = cant_inv_JDM - cant_inv_M
  )

2 Cant budgets

Global Cant inventories budget were estimated separately for ocean basins in units of Pg C, based on all vs positive only Cant estimates.

Results were integrated over the upper 100, 500, 1000, 3000, 10^{4} m of the water column.

# calculate budgets
cant_inv_budget <- cant_inv_wide %>%
  mutate(
    surface_area = earth_surf(lat, lon),
    cant_inv_grid_JDM = cant_inv_JDM * surface_area,
    cant_inv_grid_M = cant_inv_M * surface_area,
    cant_pos_inv_grid_JDM = cant_pos_inv_JDM * surface_area,
    cant_pos_inv_grid_M = cant_pos_inv_M * surface_area,
    cant_inv_offset_grid = cant_inv_offset * surface_area,
    cant_pos_inv_offset_grid = cant_pos_inv_offset * surface_area
  ) %>%
  group_by(basin_AIP, eras, inv_depth) %>%
  summarise(
    cant_JDM = sum(cant_inv_grid_JDM) * 12 * 1e-15,
    cant_JDM = round(cant_JDM, 1),
    cant_M = sum(cant_inv_grid_M) * 12 * 1e-15,
    cant_M = round(cant_M, 1),
    cant_pos_JDM = sum(cant_pos_inv_grid_JDM) * 12 * 1e-15,
    cant_pos_JDM = round(cant_pos_JDM, 1),
    cant_pos_M = sum(cant_pos_inv_grid_M) * 12 * 1e-15,
    cant_pos_M = round(cant_pos_M, 1),
    cant_inv_offset = sum(cant_inv_offset_grid) * 12 * 1e-15,
    cant_inv_offset = round(cant_inv_offset, 1),
    cant_pos_inv_offset = sum(cant_pos_inv_offset_grid) * 12 * 1e-15,
    cant_pos_inv_offset = round(cant_pos_inv_offset, 1)
  ) %>%
  ungroup()

# print budget table
cant_inv_budget %>%
  gt(
    rowname_col = "basin_AIP",
    groupname_col = c("eras", "inv_depth"),
    row_group.sep = " | Depth: "
  ) %>%
  summary_rows(groups = TRUE,
               fns = list(total = "sum"))
cant_JDM cant_M cant_pos_JDM cant_pos_M cant_inv_offset cant_pos_inv_offset
1982-1999 --> 2000-2012 | Depth: 100
Atlantic 1.3 1.2 1.4 1.2 0.1 0.2
Indian 1.1 1.0 1.1 1.0 0.1 0.1
Pacific 2.7 2.5 2.7 2.5 0.2 0.2
total 5.10 4.70 5.20 4.70 0.40 0.50
1982-1999 --> 2000-2012 | Depth: 500
Atlantic 4.6 4.3 4.6 4.3 0.3 0.3
Indian 4.2 4.0 4.2 4.0 0.2 0.2
Pacific 9.4 8.9 9.4 8.9 0.4 0.4
total 18.20 17.20 18.20 17.20 0.90 0.90
1982-1999 --> 2000-2012 | Depth: 1000
Atlantic 6.1 5.7 6.1 5.7 0.3 0.4
Indian 6.3 6.0 6.3 6.0 0.3 0.3
Pacific 12.4 11.4 12.4 11.4 0.9 0.9
total 24.80 23.10 24.80 23.10 1.50 1.60
1982-1999 --> 2000-2012 | Depth: 3000
Atlantic 6.6 6.5 6.9 6.5 0.0 0.3
Indian 7.6 7.0 7.6 7.0 0.6 0.6
Pacific 13.7 12.3 13.8 12.4 1.4 1.4
total 27.90 25.80 28.30 25.90 2.00 2.30
1982-1999 --> 2000-2012 | Depth: 10000
Atlantic 6.6 6.5 6.9 6.6 0.0 0.4
Indian 7.7 7.0 7.8 7.0 0.8 0.7
Pacific 13.8 12.3 14.0 12.5 1.5 1.5
total 28.10 25.80 28.70 26.10 2.30 2.60
2000-2012 --> 2013-2019 | Depth: 100
Atlantic 1.2 0.9 1.2 0.9 0.2 0.2
Indian 0.9 0.8 0.9 0.8 0.1 0.1
Pacific 2.2 1.9 2.2 1.9 0.3 0.3
total 4.30 3.60 4.30 3.60 0.60 0.60
2000-2012 --> 2013-2019 | Depth: 500
Atlantic 3.7 3.4 3.7 3.4 0.3 0.3
Indian 3.3 3.2 3.3 3.2 0.2 0.2
Pacific 7.5 7.0 7.5 7.0 0.4 0.4
total 14.50 13.60 14.50 13.60 0.90 0.90
2000-2012 --> 2013-2019 | Depth: 1000
Atlantic 4.9 4.6 4.9 4.6 0.3 0.3
Indian 5.0 4.8 5.0 4.8 0.2 0.2
Pacific 9.8 9.2 9.8 9.2 0.7 0.7
total 19.70 18.60 19.70 18.60 1.20 1.20
2000-2012 --> 2013-2019 | Depth: 3000
Atlantic 5.3 5.3 5.5 5.3 0.0 0.2
Indian 5.9 5.6 6.0 5.7 0.3 0.3
Pacific 10.9 10.0 11.0 10.1 0.9 1.0
total 22.10 20.90 22.50 21.10 1.20 1.50
2000-2012 --> 2013-2019 | Depth: 10000
Atlantic 5.3 5.3 5.6 5.3 0.0 0.3
Indian 6.0 5.7 6.1 5.7 0.3 0.4
Pacific 11.0 10.0 11.2 10.1 1.0 1.1
total 22.30 21.00 22.90 21.10 1.30 1.80
rm(cant_inv_budget)

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        marelac_2.1.10  shape_1.4.5     scales_1.1.1   
 [5] metR_0.9.0      scico_1.2.0     patchwork_1.1.1 collapse_1.5.0 
 [9] forcats_0.5.0   stringr_1.4.0   dplyr_1.0.2     purrr_0.3.4    
[13] readr_1.4.0     tidyr_1.1.2     tibble_3.0.4    ggplot2_3.3.3  
[17] tidyverse_1.3.0 workflowr_1.6.2

loaded via a namespace (and not attached):
 [1] httr_1.4.2               sass_0.2.0               jsonlite_1.7.2          
 [4] here_1.0.1               modelr_0.1.8             assertthat_0.2.1        
 [7] blob_1.2.1               cellranger_1.1.0         yaml_2.2.1              
[10] pillar_1.4.7             backports_1.1.10         lattice_0.20-41         
[13] glue_1.4.2               RcppEigen_0.3.3.9.1      digest_0.6.27           
[16] promises_1.1.1           checkmate_2.0.0          rvest_0.3.6             
[19] colorspace_2.0-0         htmltools_0.5.0          httpuv_1.5.4            
[22] Matrix_1.2-18            pkgconfig_2.0.3          broom_0.7.3             
[25] seacarb_3.2.15           haven_2.3.1              whisker_0.4             
[28] later_1.1.0.1            git2r_0.27.1             generics_0.1.0          
[31] ellipsis_0.3.1           withr_2.3.0              cli_2.2.0               
[34] magrittr_2.0.1           crayon_1.3.4             readxl_1.3.1            
[37] evaluate_0.14            fs_1.5.0                 fansi_0.4.1             
[40] xml2_1.3.2               RcppArmadillo_0.10.1.2.2 oce_1.2-0               
[43] tools_4.0.3              data.table_1.13.6        hms_0.5.3               
[46] lifecycle_0.2.0          munsell_0.5.0            reprex_0.3.0            
[49] gsw_1.0-5                compiler_4.0.3           rlang_0.4.10            
[52] grid_4.0.3               rstudioapi_0.13          rmarkdown_2.5           
[55] testthat_3.0.1           gtable_0.3.0             DBI_1.1.0               
[58] R6_2.5.0                 lubridate_1.7.9          knitr_1.30              
[61] rprojroot_2.0.2          stringi_1.5.3            parallel_4.0.3          
[64] Rcpp_1.0.5               vctrs_0.3.6              dbplyr_1.4.4            
[67] tidyselect_1.1.0         xfun_0.20