r - 如何在 R 中获取整数哈希码？

Question

我想做的是在 R 中实现哈希技巧。

代码如下:

library(digest)
a<-digest("key_a", algo='xxhash32')
#[1] "4da5b0f8"

这返回了字符类型的哈希码。有什么办法可以把它变成整数吗？或者还有其他包可以实现这个目的吗？

Answer 1

该输出是一个十六进制(以 16 为基数)字符串。使用以下函数将其更改为十进制。取自另一篇论坛帖子，但链接不再有效(2017)。

hex_to_int = function(h) {
  xx = strsplit(tolower(h), "")[[1L]]
  pos = match(xx, c(0L:9L, letters[1L:6L]))
  sum((pos - 1L) * 16^(rev(seq_along(xx) - 1)))
}

输出

> hex_to_int(a)
[1] 1302704376

但更好的答案是strtoi:正如@Andrie所说和@Gedrox回答，base::strtoi 函数的工作方式相同。

strtoi("4da5b0f8", 16)
[1] 1302704376