지급 데이터셋
데이터셋 expensesCEO 는 상장 금융회사의 CEO가 집행한 1,000건의 지급 내역으로 이루어져 있어요.
대부분의 청구서는 공급업체로부터 받은 재화와 용역에 대한 것이거나, 업무 관련 활동을 위해 지출한 비용이에요.
이 연습은 강의의 일부입니다
R로 배우는 사기 탐지
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Validate data against Benford's Law using first digit
bfd.exp <- benford(___, number.of.digits = ___)
plot(bfd.exp, except=c("second order", "summation", "mantissa", "chi squared","abs diff", "ex summation", "Legend"), multiple = F)