如何将十六进制字符串转换为 R 中的文本？

Question

R 中是否有将十六进制字符串转换为文本的函数？

例如：

我有十六进制字符串 1271763355662E324375203137，应该将其转换为 qv3Uf.2Cu 17。

有人知道 R 中好的解决方案吗？

Answer 1

这是一种方法：

s <- '1271763355662E324375203137'
h <- sapply(seq(1, nchar(s), by=2), function(x) substr(s, x, x+1))
rawToChar(as.raw(strtoi(h, 16L)))

## [1] "2qv3Uf.2Cu 17"

如果需要，您可以 sub 输出不可打印的字符，如下所示：

gsub('[^[:print:]]+', '', rawToChar(as.raw(strtoi(h, 16L))))

## [1] "qv3Uf.2Cu 17"

Answer 2

只是添加到@jbaums 的答案或对其进行简化

library(wkb)

hex_string <- '231458716E234987'

hex_raw <- wkb::hex2raw(hex_string)

text <- rawToChar(as.raw(strtoi(hex_raw, 16L)))

如何将十六进制字符串转换为 R 中的文本？

How to convert a hex string to text in R?

hex

text

r

converter