国勢調査データの適合性
ベンフォードの法則を使う前に、まずデータセットがその法則に適合しているかを確認することが大切です。データセット census.2009 には、米国の 19509 の町や都市の人口(2009 年 7 月)が含まれており、Nigrini, M. J. (2012). Benford’s Law: Application for Forensic Accounting, Auditing and Fraud Detection. Wiley and Sons: New Jersey で使用されています。2009 年の人口がベンフォードの法則を満たすかを検証してみましょう。
プロットはグラフ本体と凡例が別々に表示されます。グラフを確認するには Previous Plot をクリックしてください。
この演習はコースの一部です
Rで学ぶ不正検知
演習の手順
benford.analysisパッケージを読み込みます。- 変数
pop.2009が最初の桁についてベンフォードの法則の分布に適合しているかを確認します。ここでは生成される最初のプロットのみを見ます。その他のプロットはこのコースの範囲外です。 - 変数
pop.2009に 3 を掛けて、もう一度適合性を確認します。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# 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)