R/utils_hash.R

In tarchetypes: Archetypes for Targets

Defines functions hash_rows hash_object

hash_object <- function(object) {
  secretbase::siphash13(x = object)
}

hash_rows <- function(data) {
  make.unique(map_rows(data, hash_object), sep = "_")
}

Try the tarchetypes package in your browser