Detecția fraudelor în R
Bart Baesens
Professor Data Science at KU Leuven
Preferabil, mai mult de 1000 de numere care acoperă mai multe ordine de mărime.
Datele pot pur și simplu să nu respecte Legea Benford.
Un set de date respectă Legea Benford pentru primele două cifre dacă probabilitatea ca primele două cifre $D_1D_2$ să fie egale cu $d_1d_2$ este aproximativ:
$$P(D_1D_2=d_1d_2)=\log\left(1+\frac{1}{d_1d_2}\right) \qquad d_1d_2\in [10, 11, ..., 98, 99]$$
benlaw <- function(d) log10(1 + 1 / d)
benlaw(12)
0.03476211
Acest test este mai fiabil decât testul primei cifre și este cel mai frecvent utilizat în detectarea fraudelor.
bfd.cen <- benford(census.2009$pop.2009, number.of.digits = 2)
plot(bfd.cen)

expenses conține 1000 de rambursări.benford.analysis.bfd1.exp <- benford(expenses, number.of.digits = 1)
plot(bfd1.exp)

bfd2.exp <- benford(expenses, number.of.digits = 2)
plot(bfd2.exp)

Detecția fraudelor în R