Nothing
context("Checking: dat.furukawa2003")
library(digest)
test_that("md5 hash matches for the data", {
expect_match(digest(metadat::dat.furukawa2003, algo="md5"), "e9f22be16a3dfd4832663ede1fe9d462")
})
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.