test_that("rectangulo works", {
expect_equal(regla_rectangulo(0,1,function(x){return(x)}), 0)
expect_equal(regla_rectangulo(-1,1,function(x){return(x^2)}), 2)
expect_equal(regla_rectangulo(-2,0,function(x){return(x+2)}), 0)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.