anonymize: Anonymize
In jangorecki/dwtools: Data Warehouse related functions.

Description Usage Arguments Value Examples

Mask data using hasing function

1	anonymize(x, algo)

`x`	vector to anonymize
`algo`	character scalar to be used for digest function in digest package, read `?digest::digest`.

character vector of hashes, same length as length of x argument.

suppressPackageStartupMessages(library(dwtools))

X = dw.populate(N=1e5, scenario="star")
DT <- joinbyv(X$SALES, list(X$CUSTOMER))
print(DT)
cols_to_mask <- c("cust_code", "cust_name", "cust_mail")
DT[, (cols_to_mask) := lapply(.SD, anonymize, "crc32"), .SDcols=c(cols_to_mask)]
print(DT)