test_that("To calculate 1-e^2 works", {
Ellip <- Ellipsoids
value <- E2(5, digits = 4)
expect_equal(E2(5, digits = 4), value)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.