# Tests "logsum" function
context("adding small probabilities")
library(dst)
test_that("logsum", {
expect_equal(exp(logsum(log(1e-5),log(1e-5))),1e-5+1e-5)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.