有些网页的图像是使用base64编码的png URL,现在需要将其保存成png文件方便查阅。
“`{r}
library(base64enc)
x <- "iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAAKElEQVQ4jWNgYGD4Twzu6FhFFGYYNXDUwGFpIAk2E4dHDRw1cDgaCAASFOffhEIO3gAAAABJRU5ErkJggg=="
y <- base64decode(x)
writeBin(y, "testBase64To.png")
```=====EndrmdSourceCode=====
有些网页的图像是使用base64编码的png URL,现在需要将其保存成png文件方便查阅。
library(base64enc)
x <- "iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAAKElEQVQ4jWNgYGD4Twzu6FhFFGYYNXDUwGFpIAk2E4dHDRw1cDgaCAASFOffhEIO3gAAAABJRU5ErkJggg=="
y <- base64decode(x)
writeBin(y, "testBase64To.png")
相关