R变换十六进制为base64

Question

我试图从十六进制转换为base64但我喜欢base64Encode或base64_enc职能不转换，我从这个网站https://conv.darkbyte.ru/获取或本网站匹配得到转换http://tomeko.net/online_tools/hex_to_base64.php?lang=en

library(RCurl) 
library(jsonlite) 

hex_number="9d0a5a7d6771dd7fa321a48a820f93627657df 
3292548df1389533913a60328300a9cc80d982875a8d08bb7 
602c59935cacae88ea635ed8d3cea9ef57b1884cc" 

base64_enc(hex_number) 
#"OWQwYTVhN2Q2NzcxZGQ3ZmEzMjFhNDhhODIwZjkzNjI3NjU3ZGYKMzI5M 
#jU0OGRmMTM4OTUz\nMzkxM2E2MDMyODMwMGE5Y2M4MGQ5ODI4NzVhOGQwO 
#GJiNwo2MDJjNTk5MzVjYWNhZTg4ZWE2\nMzVlZDhkM2NlYTllZjU3YjE4ODRjYw==" 

base64Encode(hex_number) 
#"OWQwYTVhN2Q2NzcxZGQ3ZmEzMjFhNDhhODIwZjkzNjI3NjU3ZGYKMzI5M 
#jU0OGRmMTM4OTUzMzkxM2E2MDMyODMwMGE5Y2M4MGQ5ODI4NzVhOGQwOGJiNwo 
#2MDJjNTk5MzVjYWNhZTg4ZWE2MzVlZDhkM2NlYTllZjU3YjE4ODRjYw==" 

#desired result: 
#nQpafWdx3X+jIaSKgg+TYnZX3zKSVI3xOJUzkTpgMoMAqcyA2YKHWo0Iu3YCxZk1ysrojqY17Y086p71exiEzA== 

此外，我已经尝试将十六进制转换为文本，然后将其更改为十六进制，并使用此页面中的代码。http://blog.entropic-data.com/2017/04/19/short-dealing-with-embedded-nul-in-string-manipulation-with-r/我没有得到我想要的结果。

Answer 1

从wkb包借一些代码（或只是直接安装并使用它）它传递到基座64的转换例程中的一个之前，将十六进制字符串转换成原始向量：

hex_number <- "9d0a5a7d6771dd7fa321a48a820f93627657df3292548df1389533913a60328300a9cc80d982875a8d08bb7602c59935cacae88ea635ed8d3cea9ef57b1884cc" 

I” m“source -ing”这个，但是如果你打算使用它的话，你应该在本地复制代码，因为GH可能会关闭或代码可能改变。

source_url("https://raw.githubusercontent.com/ianmcook/wkb/master/R/hex2raw.R", 
      sha1 = "4443c72fb3831e002359ad564f1f2a8ec5e45e0c") 

openssl::base64_encode(hex2raw(hex_number)) 
## [1] "nQpafWdx3X+jIaSKgg+TYnZX3zKSVI3xOJUzkTpgMoMAqcyA2YKHWo0Iu3YCxZk1ysrojqY17Y086p71exiEzA==" 

OR（如果你愿意有wkb包作为依赖性：

openssl::base64_encode(wkb::hex2raw(hex_number))