knitr::opts_chunk$set(echo = TRUE) library(rsvg)
The rsvg
R package provides bindings to librsvg-2 to render SVG files into bitmaps directly from R. On Linux systems, you need to install librsvg from apt
or yum
before installing the R package from CRAN. On Windows and MacOS this is not needed.
This Mozilla example shows that the SVG specification allows for a style
element, which is also supported in all browsers. Embedded CSS is supported in all versions of librsvg, but the quality of css rendering has improved a lot in recent versions of librsvg.
str <- charToRaw('<svg viewBox="0 0 300 300" xmlns="http://www.w3.org/2000/svg"> <style> circle { fill: gold; stroke: maroon; stroke-width: 10px; } </style> <circle cx="150" cy="150" r="100" /> </svg>') rsvg_png(str, file = 'ex1.png')
knitr::include_graphics("ex1.png")
Recent versions of librsvg can also apply an external CSS file to the SVG. This has the same effect as an external CSS file that is embedded in header of an HTML file.
By using an external CSS, we can split the drawing structure from the styling. The new "css" parameter requires a somewhat recent version of librsvg so it may not work on older Linux systems. It is available on any MacOS or Windows, and the latest versions of Ubuntu, Debian, Fedora, etc.
svg <- charToRaw('<svg viewBox="0 0 300 300" xmlns="http://www.w3.org/2000/svg"> <circle cx="150" cy="150" r="100" /> </svg>') # Render without style: rsvg_png(svg, file = 'ex2.png')
knitr::include_graphics("ex2.png")
css <- charToRaw('circle { fill: navy; stroke: hotpink; stroke-width: 10px; }') # Render without style: rsvg_png(svg, css = css, file = 'ex3.png')
knitr::include_graphics("ex3.png")
The examples above write the rendered SVG file directly to a PNG file on disk. But you can also render the SVG to an in-memory bitmap buffer.
bitmap <- rsvg_raw('https://jeroen.github.io/images/tiger.svg', width = 600) str(bitmap)
The bitmap
object is an array in R that contain the pixels of the image. You can read it for example using the magick
package for subsequent image editing, or to save it to a standard format.
magick::image_read(bitmap)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.