# NOT RUN {
x <- c("Lorem ipsum dolor sit amet, consectetur adipiscing elit.",
"Nunc finibus tortor a elit eleifend interdum.",
"Maecenas aliquam augue sit amet ultricies placerat.")
salt_substitute(x, shaker$digits, p = 0.5, n = 5)
# }
Run the code above in your browser using DataLab