get_protected: Get protected nodes

In ropenscilabs/tinkr: Cast '(R)Markdown' Files to 'XML' and Back Again

Get protected nodes

Description

Get protected nodes

Usage

get_protected(body, type = NULL, ns = md_ns())

Arguments

body	an xml_document object
type	a character vector listing the protections to be included. Defaults to NULL, which includes all protected nodes: math: via the protect_math() function curly: via the protect_curly() function unescaped: via the protect_unescaped() function
ns	the namespace of the document (defaults to md_ns())

Value

an xml_nodelist object.

Examples

path <- system.file("extdata", "basic-curly.md", package = "tinkr")
ex <- tinkr::yarn$new(path, sourcepos = TRUE)
# protect curly braces
ex$protect_curly()
# add math and protect it
ex$add_md(c("## math\n", 
  "$c^2 = a^2 + b^2$\n", 
  "$$",
  "\\sum_{i}^k = x_i + 1",
  "$$\n")
)
ex$protect_math()
# get protected now shows all the protected nodes
get_protected(ex$body)
get_protected(ex$body, c("math", "curly")) # only show the math and curly

ropenscilabs/tinkr documentation built on Feb. 24, 2025, 6:43 a.m.