Question

我在下面的帖子中看到了将png文件转换为base64的过程 Convert R image to Base 64

我想与你所做的完全相反。我有一个存储在变量“capimg”中的图像base64，现在我想将其转换为png或jpeg文件。你能帮我逆向工程吗？

这可行吗？

我已经看到这样做使用如下的PHP，但我需要一个R脚本来做同样的

<?php
$data = urldecode($_POST['imageData']);
list($type, $data) = explode(';', $data);
list(, $data)      = explode(',', $data);
$data = base64_decode($data);
file_put_contents('image.png', $data);
?>

实际上我也可以使用base64enc软件包将base64解码为一个向量，如下所示 y＆lt; - base64decode（capimg）

但我不知道如何继续进行

Answer 1

这对我有用：

library(base64enc)

enc <- base64encode("images.jpg")
conn <- file("w.bin","wb")
writeBin(enc, conn)
close(conn)

inconn <- file("w.bin","rb")
outconn <- file("img2.jpg","wb")
base64decode(what=inconn, output=outconn)
close(inconn)
close(outconn)

images.jpg由here

访问的维基百科提供

在R中将Base64转换为PNG / JPEG文件

1 个答案: