我有一个在内存中自动生成的 png 图像，而不是从磁盘加载它。我当然可以先将它保存到磁盘，但我宁愿不这样做。我想在 ggplot2 图中的某处显示该图像，但找不到合适的包/函数来执行此操作。
我在内存中的图像是例如
x <- "data:image/png;base64,..."
更新一个现实的用例，以及我在尝试使用答案 #1 时遇到的错误
library(qrencoder)
x <- qrencode_png("http://rud.is/b")
x
[1] "data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABUAAAAVCAAAAACMfPpKAAAACXBIWXMAAC4jAAAuIwF4pT92AAAAfElEQVQYlU2QWwrEMAwDR0vuf+XZj8qJSyjIyNYjAkAMQNFhkBCKzoNiin70kxKBN41ENuf7+9AZWQOGRx/2m4TeKy2YO0GyDpwszW5EUCs/ur78NZtGvSa8azdPDGttsonot8LtDFNnrs4yLSbuJk0ajnV3vevhCxUj4Q+R11n764g4WgAAAABJRU5ErkJggg=="
myImage <- png::readPNG(x)
> Error in png::readPNG(x) :
> unable to open
> data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAABUAAAAVCAAAAACMfPpKAAAACXBIWXMAAC4jAAAuIwF4pT92AAAAfElEQVQYlU2QWwrEMAwDR0vuf+XZj8qJSyjIyNYjAkAMQNFhkBCKzoNiin70kxKBN41ENuf7+9AZWQOGRx/2m4TeKy2YO0GyDpwszW5EUCs/ur78NZtGvSa8azdPDGttsonot8LtDFNnrs4yLSbuJk0ajnV3vevhCxUj4Q+R11n764g4WgAAAABJRU5ErkJggg==
我也尝试了以下但我得到不同的错误：
qrGrob <- grid::gTree(children=gList(grid::rasterGrob(x)))
或者
qrGrob <- grid::gTree(children=gList(grid::rasterGrob(x)))
我找不到从内存中加载 PNG 的任何方法。但是，使用光栅版本可以完美地使用另一种方式：
library(ggplot2)
library(raster)
library(qrencoder)
library(grid)
qrGrob <- grid::rasterGrob(raster::as.raster(
qrencoder::qrencode_raster("http://rud.is/b"),
maxpixels=.Machine$integer.max,col=c("white", "black")),
interpolate=FALSE)
ggplot() + geom_blank() + annotation_custom(qrGrob,0,1,0,1)
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句