Here we parse the file:
library(goodpracticeeighteen)
One file:
#filename <- find_path("f_with_examples.Rd") #testit::assert(has_examples_in_rd(filename)) #filename <- find_path("f_without_examples.Rd") #testit::assert(!has_examples_in_rd(filename))
Multiple files:
#filenames <- find_paths(c("f_with_examples.Rd", "f_without_examples.Rd")) #testit::assert(has_examples_in_rds(filenames) == c(TRUE, FALSE))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.