The “sample” function in the statistical programming language R is biased… See screenshot.
Possible fix: github.com/daqana/dqsample
1
12
2
30
Indeed, see the NEWS file. On my box with R 3.6.2:
R> set.seed(42) # just to fix things
R> x <- sample(1717986919,1000000, replace=TRUE)
R> table(x%%2)
0 1
500247 499753
R>
Dec 27, 2019 · 3:59 PM UTC
4