# NOT RUN {
#Computer generated random data do not conform to the benford law
result <- benford(seq(1,10000)+rnorm(10000,0,100), TRUE)
#Natural data set, countaining the number of daily new cases of COVID-19 in Switzerland
##conform to the Benford' Law
result <- benford(switz.data, TRUE)
##conform to second digit analysis of the Benford' Law
result <- benford(switz.data, TRUE, 2)
# }
Run the code above in your browser using DataLab