Run plotting code and return svg — xmlSVG • svglite

This is useful primarily for testing. Requires the xml2 package.

Usage

xmlSVG(code, ..., standalone = FALSE, height = 7, width = 7)

Arguments

code: Plotting code to execute.
...: Other arguments passed on to svglite.
standalone: Produce a standalone svg file? If FALSE, omits xml header and default namespace.
height, width: Height and width in inches.

Value

A xml2::xml_document object.

Examples

if (require("xml2")) {
  x <- xmlSVG(plot(1, axes = FALSE))
  x
  xml_find_all(x, ".//text")
}
#> Loading required package: xml2
#> {xml_nodeset (2)}
#> [1] <text x="266.40" y="485.28" text-anchor="middle" style="font-size:  ...
#> [2] <text transform="translate(12.96,244.80) rotate(-90)" text-anchor=" ...