improve seeding mechanism fpr problem with params

[berndbischl]

Also better document it on webpage

Code snippet :

objToSeed = function(x, algo="crc32") {
 library(digest)
 hash = digest(ch, algo=algo)
 strtoi(sprintf("0x%s", substr(hash, 1L, 7L)))
}

objToSeed("a2j")

[mllg]

Small typo there. And there are some clashes....

library(BBmisc)
library(digest)

objToSeed = function(x, algo="crc32") {
 hash = digest(x, algo=algo)
 strtoi(sprintf("0x%s", substr(hash, 1L, 7L)))
}

N = 1e5
x = rnorm(N)
res = viapply(rnorm(1e5), objToSeed)
(sum(duplicated(res)) - sum(duplicated(x))) / N * 100

Around 0.02% for this very basic example.

[mllg]

I got results near N / .Machine$integer.max with md5. Seems okay I guess?