# tests for read_edw_data
dir <- paste0(system.file(package = "edwr", "extdata"))
library(edwr)
context("Check examples")
test_examples()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.