expect_equal2 <- function (object, expected, tol = 1e-5, ..., info = NULL,
label = NULL, expected.label = NULL) {
expect_equal(
object = object, expected = expected,
tol = tol, ..., info = info, label = label,
expected.label = expected.label
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.