3-cs-fraudulent-transactions

Ja145a 1352 ca14120122105a 031kkk

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: 8 Max. :473883883 NA's :13842 Useless! A lot not inspected Val Min. : 1005 1st Qu.: 1345 Median : 2675 Mean : 14617 3rd Qu.: 8680 Max. :4642955 NA's :1182 More salesmen than products Statistics 503, Spring 2013, ISU 4 :1##1.9# <(*(%01221.$%".%JA(.*1*4%(.>%;(5A+% ;(#1(35+2 CA(.*1*4%12%01221.$%0"#+%"/*+.%*'(.%;(5A+ &"031.+>%*'+#+%(#+%KKK%01221.$2%".%3"*'8% G'1B'%12%0"2*%"/%*'+%77KL%01221.$2%".%;(5A+ Statistics 503, Spring 2013, ISU 5 > > > > ;.#8$0&12.# sales$Insp.result <- sales$Insp sales$Insp <- as.character(sales$Insp) sales$Insp <- ifelse(sales$Insp=="unkn", "no", "yes") table(sales$Insp) no yes 385414 15732 > table(sales$Insp)/nrow(sales) no yes 0.96078236 0.03921764 > sales$Insp.result <- as.character(sales$Insp.result) > sales$Insp.result[sales$Insp.result=="unkn"] <- NA > sales$Insp.result <- factor(sales$Insp.result) > table(sales$Insp.result) fraud ok 1270 14462 > table(sales$Insp.result)/nrow(sales[!is.na(sales $Insp.result),]) fraud ok 0.08072718 0.91927282 Statistics > > > > 503, Spring 2013, ISU ;.#8$0&12.# 6 sales$Insp.result <- sales$Insp sales$Insp <- as.character(sales$Insp) sales$Insp <- ifelse(sales$Insp=="unkn", "no", "yes") table(sales$Insp) Split into two variables: inspected or not, fraud or not no yes 385414 15732 > table(sales$Insp)/nrow(sales) no yes 0.96078236 0.03921764 > sales$Insp.result <- as.character(sales$Insp.result) > sales$Insp.result[sales$Insp.result=="unkn"] <- NA > sales$Insp.result <- factor(sales$Insp.result) > table(sales$Insp.result) fraud ok 1270 14462 > table(sales$Insp.result)/nrow(sales[!is.na(sales $Insp.result),]) fraud ok 0.08072718 0.91927282 Statistics 503, Spring 2013, ISU 6 > > > > ;.#8$0&12.# sales$Insp.result <- sales$Insp sales$Insp <- as.character(sales$Insp) sales...
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