Есть ли Zlib для R?функция raw inflate - как распаковать шестнадцатеричные значения - PullRequest
Новая
       65

Есть ли Zlib для R?функция raw inflate - как распаковать шестнадцатеричные значения

0 голосов
/ 09 мая 2019

Мне нужно распаковать шестнадцатеричные значения и преобразовать их в строку.

На самом деле проблема в том, что я не могу понять, как распаковать шестнадцатеричные значения

Hex не содержит заголовков, Если я копирую шестнадцатеричные коды в CyberChef, я могу распаковать их и получить оригинальную строку

В CyberChef требуется только операция Raw Inflate. Так что я надеюсь помочь как сделать сырые надутые в R

Я попытался использовать memDecompress, используя все опции, но безуспешно (т. Е. Gzip и т. Д.)

UPDATE: Вот пример из гекса: e3 0e 71 0d 0e f1 54 c8 cb 2f 52 30 02 00 который я могу конвертировать с помощью CyberChef в строку " .TESTI, ни 2 " 

RLdata<- sqlQuery(connection, ..... AS Varbinary(max) AS NOTEShort ......

> RLdata$NOTEshort[4268]
[[1]]
 [1] e3 0e 71 0d 0e f1 54 c8 cb 2f 52 30 02 00

> unlist(RLdata$NOTEshort[4268])
 [1] e3 0e 71 0d 0e f1 54 c8 cb 2f 52 30 02 00
> memDecompress(unlist(RLdata$NOTEshort[4268]),type = "gzip", asChar = TRUE)
Error in memDecompress(unlist(RLdata$NOTEshort[4268]), type = "gzip",  : 
  internal error -3 in memDecompress(2)

> memDecompress(unlist(RLdata$NOTEshort[4268]),type = "unknown", asChar = TRUE)
[1] "ã\016q\r\016ñTÈË/R0\002"
Warning message:
In memDecompress(unlist(RLdata$NOTEshort[4268]), type = "unknown",  :
  unknown compression, assuming none

screenshot from CyberChef (png)

...