R में Fraud Detection
Tim Verdonck
Professor Data Science at KU Leuven
आउटलायर वह ऑब्ज़र्वेशन है जो अधिकांश डेटा के पैटर्न से हटकर हो.
आउटलायर धोखाधड़ी का संकेत भी हो सकता है.
Outlier detection के लिए एक लोकप्रिय टूल है:
ऑब्ज़र्वेशन $x_i$ का z-score $z_i$ ऐसे निकलेगा:
$$z_i=\frac{x_i-\hat{\mu}}{\hat{\sigma}} = \frac{x_i-\overline{x}}{s}$$
डेटासेट loginc में 10 व्यक्तियों की मासिक आय का log ट्रांसफॉर्मेशन के बाद का मान है:
loginc: 7.876 7.681 7.628 ... 7.764 9.912 # <-- आखिरी आय साफ़ तौर पर आउटलायर है!
Mean <- mean(loginc)
Sd <- sd(loginc)
zscore <- (loginc - Mean) / Sd
abs(zscore) > 3
FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
Sample mean: $$\overline{x}=\frac{1}{n}\sum_i x_i$$
mean(loginc)mean(loginc9)
7.9864477.772392
loginc9 में loginc जैसी ही ऑब्ज़र्वेशन हैं, बस आउटलायर हटाया गया है.
$n$ ऑब्ज़र्वेशन को छोटे से बड़े क्रम में रखें, तब sample median, $Med(X_n)$, odd $n$ पर $(n+1)/2$वीं ऑब्ज़र्वेशन होती है, और even $n$ पर $n/2$वीं व $n/2+1$वीं का औसत.
median(loginc)
7.816658
median(loginc9)
7.764296
(1) Sample standard deviation: $$s= \sqrt{\frac{1}{n-1}\sum_i (x_i-\hat{\mu})^2}$$
sd(loginc)
0.6976615
sd(loginc9)
0.1791729
(2) Median absolute deviation: $$Mad(X_n)=1.4826Med(|x_i-Med(X_n)|)$$
(3) Interquantile range (normalized): $$IQR(X_n)= IQR = 0.7413(Q_3-Q_1)$$ जहाँ $Q_1$ और $Q_3$ डेटा के पहला और तीसरा क्वार्टाइल हैं
IQR(loginc)/1.349
0.2056784
mad(loginc)
0.2396159
mad(loginc9)
0.201305
IQR(loginc9)/1.349
0.1839295
Robust अनुमानक लगाकर robust z-scores निकालें:
$$z_i=\frac{x_i-\hat{\mu}}{\hat{\sigma}} =\frac{x_i-Med(X_n)}{Mad(X_n)}$$
robzscore <- (loginc - median(loginc)) / mad(loginc)abs(robzscore) > 3 ## आउटलायर जाँचें
FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
robzscore[10] ## आउटलायर का robust z-score
8.748523

boxplot(los, col = "blue", ylab = "Lenght of Stay (LOS)")$out
59 33 42 67 35 47 102 36 27 31 27 30 29 32 37 27 38


Adjusted boxplot के अनुसार आउटलायर:
library(robustbase)
adjbox(los)$out
59 67 102
Adjusted boxplot द्वारा निकाले गए आँकड़े:
adjboxStats(los)$stats
2 4 8 13 47


R में Fraud Detection