library(pins)
args <- commandArgs(trailingOnly = TRUE)
board <- board_folder(args[1])
res <- board %>% pin_read("mtcars-py")
testthat::expect_equal(res, datasets::mtcars, ignore_attr = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.