test_that("spq_head() works", { query = spq_init() %>% spq_head(5) expect_equal(query[["limit"]], 5) query = spq_init() %>% spq_head(NULL) expect_equal(query[["limit"]], NULL) })
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.