Decodes base64-encoded data URIs and writes them to PNG files.
Examples
rlogo <- file.path(R.home("doc"), "html", "logo.jpg")
base64_str <- image_to_base64(rlogo)
base64_to_image(
data_uri = base64_str,
output_files = tempfile(fileext = ".jpeg")
)
#> [1] "/tmp/RtmpQRRGkO/file9e2736865693a.jpeg"
