test_that("last_rel() works", {
last_rel_store(NULL)
expect_null(last_rel())
out <- duckplyr_mutate(data.frame(a = 1), b = 2)
rel <- duckdb$rel_from_altrep_df(out)
expect_null(last_rel())
expect_silent(nrow(out))
expect_identical(last_rel(), rel)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.