# reprex
library(bdsreader)
jtf <- system.file("extdata", paste0("bds", pad), "test", paste0("test", 1:25, ".json"), package = "jamesdemodata")
jtf[1]
read_bds(jtf[1], format = 2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.