R/hasheq.R

In dirkschumacher/llr: A lisp like language on top of R

#' @export
hasheq <- function(x) {
  UseMethod("hasheq")
}

#' @import digest
#' @export
hasheq.default <- function(x) {
  attributes(x) <- NULL
  key <- serialize(x, NULL, version = 3)
  digest(key, algo = "xxhash64", raw = TRUE, ascii = FALSE)
}