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"