เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

ชุดข้อมูลการชำระเงิน

ชุดข้อมูล expensesCEO ประกอบด้วยรายการชำระเงิน 1,000 รายการของ CEO บริษัทการเงินที่จดทะเบียนในตลาดหลักทรัพย์ ใบแจ้งหนี้ส่วนใหญ่เป็นค่าสินค้าและบริการจากผู้จำหน่าย หรือค่าใช้จ่ายที่เกิดขึ้นจากการทำงาน

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การตรวจจับการฉ้อโกงใน 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)
แก้ไขและรันโค้ด