3-cs-fraudulent-transactions

53z a1b1b5b5a21b22g1b212 s11a251f543

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: 0v2120v2275v2465v2699v2927v3096v3294v3475v3752v3987v4294v4632v4911v5161v5513v5902 v1139v1251v1351v1482v1626v1761v1961v2121v2276v2466v2700v2930v3098v3297v3476v3759v3993v4296v4638v4919v5163v5520v5904 ID e#(A>%B(2+2%(#+%(B#"22%(55%2(5+20+. ["%1*%12%."*%(%0(**+#%"/%B"##A)*%2(5+20+.8%"#% *(#$+*+>%)#">AB*2U Statistics 503, Spring 2013, ISU 29 E??FFFF &'+BF%JA(.*1*4%(.>%;(5A+8%*"%2++%1/%*'+% /#(A>%B(2+2%*'(*%(#+%0">+#(*+%1.%A.1*%)#1B+% (#+%+Z*#+0+%".%JA(.*1*4%"#%;(5A+ W1$'*%3+%+(21+#%*"%>"%1.*+#(B*1;+54%A21.$% $$"31%"#%B#(.;(2 Statistics 503, Spring 2013, ISU 30 > library(cranvas) > qsales <- qdata(subset(sales.imp, Insp=="yes"), color=Insp.result) > qsales$Uprice<-log(qsales$Uprice) > qscatter(Prod, Uprice, data=qsales) > qsales$Quant<-log(qsales$Quant) > qscatter(Prod, Quant, data=qsales) > qsales$Val<-log(qsales$Val) > qscatter(Prod, Val, data=qsales) Statistics 503, Spring 2013, ISU 31 There is one product that has a suspicious pattern Statistics 503, Spring 2013, ISU 32 There is one product that has a suspicious pattern Statistics 503, Spring 2013, ISU 32 fraud 1e+06 1e+04 Val Insp.result fraud ok ok D(5A+%;2%JA(.*1*4% G1*'%/#(A>M."*% /#(A> !#(.2(B*1".2% 5(3+55+>%/#(A>2% &$.(%&2%4$%".%*'+% +Z*#+0+2%"/%3"*' 1e+06 1e+04 1e+03 Quant 1e+06 1e+09 Statistics 503, Spring 2013, ISU 33 +,"'(%($&$0&12. !"%2A$$+2*%*#(.2(B*1".2%*"%1.2)+B*%*'(*% '(;+%(%'1$'+#%)#"3(3151*4%"/%3+1.$%/#(A> -.2*+(>%"/%#(.>"054%2(0)51...
View Full Document

This note was uploaded on 02/06/2014 for the course STAT 503 taught by Professor Staff during the Fall '08 term at Iowa State.

Ask a homework question - tutors are online