context("test-raw-to-raw")
test_that("raw_to_raw works", {
raw_vec <- as.raw(1:20)
expect_identical(raw_vec, raw_to_raw(raw_vec))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.