Nothing
context("aliases")
test_that("XOR", {
expect_equal(XOR(TRUE, TRUE), FALSE)
expect_equal(XOR(TRUE, FALSE), TRUE)
expect_equal(XOR(TRUE, NA), NA)
expect_equal(XOR(FALSE, TRUE), TRUE)
expect_equal(XOR(FALSE, FALSE), FALSE)
expect_equal(XOR(FALSE, NA), NA)
expect_equal(XOR(NA, TRUE), NA)
expect_equal(XOR(NA, FALSE), NA)
expect_equal(XOR(NA, NA), NA)
})
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.