Nothing
test_that("Univariate example", {
x <- qlone(1)
f <- x^2 - 2*x - 1
g <- x^2 - 3
r <- resultant(f, g)
expect_equal(r, gmp::as.bigq("-8/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.