Nothing
test_that("arrow-to-bin roundtrip", {
expected_table <- arrow::Table$create(mtcars)
bytes <- arrow_to_bin(expected_table)
actual_table <- bin_to_arrow(bytes)
expect_equal(actual_table, expected_table)
})
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.