context("cross")
require(fql)
test_that("cartesian product cardinal respected", {
d <- cross(1:2, c("a", "b", "c"))
expect_length(d, 6)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.