Nothing
#### test the a18 functions ####
# ----- Test accuracy -----
elena = function(alpha) round(1000*log(alpha),1)
test_that("a18_DIC*_H2O 'Beck equations' produce accurate values", {
expect_equal(elena(a13_CO2g_CO2aq(temp = 25)), 1.1)
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.