Shoda dat ze sčítání lidu s Benfordovým zákonem
Než začneš Benfordův zákon používat, je důležité ověřit, jestli tvoje data tomuto zákonu odpovídají. Dataset census.2009 obsahuje počty obyvatel 19 509 měst a obcí Spojených států (červenec 2009) a byl použit v publikaci Nigrini, M. J. (2012). Benford's Law: Application for Forensic Accounting, Auditing and Fraud Detection. Wiley and Sons: New Jersey. Pojďme otestovat, zda počty obyvatel v roce 2009 splňují Benfordův zákon.
Grafy a legendy se zobrazí odděleně – klikni na Previous Plot, abys viděl/a samotné grafy.
Toto cvičení je součástí kurzu
Detekce podvodů v R
Pokyny k cvičení
- Načti balíček
benford.analysis. - Ověř shodu proměnné
pop.2009s rozdělením Benfordova zákona pro první cifru. Zaměř se pouze na první vykreslený graf – ostatní grafy jsou mimo rozsah tohoto kurzu. - Vynásob proměnnou
pop.2009třemi a shodu ověř znovu.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# Load package benford.analysis
library(___)
data(census.2009)
# Check conformity
bfd.cen <- benford(___$___, number.of.digits = ___)
plot(bfd.cen, except = c("second order", "summation", "mantissa", "chi squared","abs diff", "ex summation", "Legend"), multiple = F)
# Multiply the data by 3 and check conformity again
data <- census.2009$pop.2009 * ___
bfd.cen3 <- benford(___, number.of.digits=___)
plot(bfd.cen3, except = c("second order", "summation", "mantissa", "chi squared","abs diff", "ex summation", "Legend"), multiple = F)