# BAS474 hw8

Views:

Category: Entertainment

## Presentation Description

No description available.

## Presentation Transcript

### BAS 474 HW#8:

BAS 474 HW#8 Heath Hamby Group 34

### Variables for Analysis:

Variables for Analysis ADATE_2--- Date the 97NK promotion was mailed ADATE_3--- Date the 96NK promotion was mailed ADATE_4--- Date the 96TK promotion was mailed RDATE_3---Date the gift was received for 96NK RDATE_4---Date the gift was received for 96TK RDATE_5---Date the gift was received for 96SK

### Interpretation of Variables:

Interpretation of Variables I was assigned 40+ variables but I took a set of 6 of them that should represent how the work would be done for all 40 variables. If “9706” was the input for the variable ADATE_2 this would mean that the date that the promotion was mailed was in June(6 th month) of 1997(97). All of the ADATE variables follow this same pattern. If “9602” was the input for the variable RDATE_3 then this would mean that the gift was received in February(2 nd month) of 1996(96). All of the RDATE variables behave this way.

ADATE_2 Date the 97NK promotion was mailed 9704 9706 5 48274 What this data means is that 5 times the 97NK promotion was mailed in April 1997 and 48,274 times it was mailed in June 1997.

### Barchart of ADATE_2:

ADATE_3 Date the 96NK promotion was mailed 9604 9606 7 47277 This means that 7 times the 96NK promotion was mailed in April 1996 and 47,277 times it was mailed in June 1996.

### Barchart of ADATE_3 :

ADATE_4 Date that the 96TK promotion was mailed 9511 9512 9602 9603 9604 9605 9607 9609 2 2 1 11 46776 86 170 93 This means that the promotion was mailed twice in November 1995, twice in December 1995, once in February ‘96, 11 times in March ‘96, 46776 times in April ‘96, 86 times in May ‘96, 170 times in July ‘96, and 93 times in September ‘96.

### RDATE_3:

RDATE_3 Date the gift was received for 96NK 9605 9606 9607 9608 9609 9610 9611 9612 9703 9704 9705 5 48 34 3 2 2 1 1 1 7 1 This means that the gift was received for 96NK 5 times in May ‘96, 48 times in June ‘96, 34 times in July ‘96, 3 times in August ‘96, 2 times in September ‘96, 2 times in October ’ 96, once in November ’ 96, once in December ‘96, once in March ‘97, 7 times in April ‘97, and once in May ’ 97.

### Barchart of RDATE_3:

Barchart of RDATE_3

### RDATE_4:

RDATE_4 Date the gift was received for 96TK 9510 9511 9512 9601 9602 9603 9604 9605 9606 9607 9608 1 5 7 11 7 10 16 44 13 6 5 9609 9610 9611 9701 9703 9704 9802 9803 9804 9805 13 6 4 1 3 7 1 1 2 1 This data means that the gift for the 96TK was received once in October ‘95, 5 times in November ‘95, 7 times in December ‘95, 11 times in January ‘96, 7 times in February ‘96, 10 times in March ‘96, 16 times in April ‘96, 44 times in May ‘96, 13 times in June ‘96, 6 times in July ‘96, 5 times in August ‘96, 13 times in September ‘96, 6 times in October ‘96, 4 times in November ‘96, 1 time in January ‘97, 3 times in March ‘97, 7 times in April ‘97, once in February ‘98, once in March ‘98, twice in April ‘98, and once in May ‘98.

### Barchart of RDATE_4:

Barchart of RDATE_4

### RDATE_5:

RDATE_5 Date the gift for the 96SK was received. 9604 9605 9703 9803 3 2 1 1 This means that 3 times the 96SK gift was received in April ‘96, twice in May ‘96, once in March ‘97, and once in March ‘98.

### Barchart of RDATE_5:

Barchart of RDATE_5

### R code:

R code #Q1 OF HW8 datatrain <- read.table (file='data.train. csv ', sep =',',header=T) datascore <- read.table (file='data.score. csv ', sep =',', header=T) TARGET_B<- sample(0:1, 48279, replace=T) summary( datascore\$TARGET_B ) datascore\$TARGET_B <-TARGET_B datascore\$TARGET_B <- as.factor (TARGET_B) result<- datascore [,c("CONTROLN", "TARGET_B")] View(result)