How to convert a hex string to text in R? How to convert a hex string to text in R? r r

How to convert a hex string to text in R?


Here's one way:

s <- '1271763355662E324375203137'h <- sapply(seq(1, nchar(s), by=2), function(x) substr(s, x, x+1))rawToChar(as.raw(strtoi(h, 16L)))## [1] "\022qv3Uf.2Cu 17"

And if you want, you can sub out non-printable characters as follows:

gsub('[^[:print:]]+', '', rawToChar(as.raw(strtoi(h, 16L))))## [1] "qv3Uf.2Cu 17"


Just to add to @jbaums answer or to simplify it

library(wkb)hex_string <- '231458716E234987'hex_raw <- wkb::hex2raw(hex_string)text <- rawToChar(as.raw(strtoi(hex_raw, 16L)))