# NOT RUN {
library(nprcgenekeepr)
integerIds <- 1:10
obfuscateId(integerIds, size = 4)
characterIds <- paste0(paste0(sample(LETTERS, 1, replace = FALSE)), 1:10)
obfuscateId(characterIds, size = 4)
# }
Run the code above in your browser using DataLab