# Load the dataset
data <- readr::read_csv("C:/Users/Mahika/OneDrive - University of Cincinnati/BANA 4080/data/customer_retention.csv")
## Rows: 6999 Columns: 20
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (16): Gender, Partner, Dependents, PhoneService, MultipleLines, Internet...
## dbl  (4): SeniorCitizen, Tenure, MonthlyCharges, TotalCharges
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
# View initial structure and summary
str(data)
## spc_tbl_ [6,999 × 20] (S3: spec_tbl_df/tbl_df/tbl/data.frame)
##  $ Gender          : chr [1:6999] "Female" "Male" "Male" "Male" ...
##  $ SeniorCitizen   : num [1:6999] 0 0 0 0 0 0 0 0 0 0 ...
##  $ Partner         : chr [1:6999] "Yes" "No" "No" "No" ...
##  $ Dependents      : chr [1:6999] "No" "No" "No" "No" ...
##  $ Tenure          : num [1:6999] 1 34 2 45 2 8 22 10 28 62 ...
##  $ PhoneService    : chr [1:6999] "No" "Yes" "Yes" "No" ...
##  $ MultipleLines   : chr [1:6999] "No phone service" "No" "No" "No phone service" ...
##  $ InternetService : chr [1:6999] "DSL" "DSL" "DSL" "DSL" ...
##  $ OnlineSecurity  : chr [1:6999] "No" "Yes" "Yes" "Yes" ...
##  $ OnlineBackup    : chr [1:6999] "Yes" "No" "Yes" "No" ...
##  $ DeviceProtection: chr [1:6999] "No" "Yes" "No" "Yes" ...
##  $ TechSupport     : chr [1:6999] "No" "No" "No" "Yes" ...
##  $ StreamingTV     : chr [1:6999] "No" "No" "No" "No" ...
##  $ StreamingMovies : chr [1:6999] "No" "No" "No" "No" ...
##  $ Contract        : chr [1:6999] "Month-to-month" "One year" "Month-to-month" "One year" ...
##  $ PaperlessBilling: chr [1:6999] "Yes" "No" "Yes" "No" ...
##  $ PaymentMethod   : chr [1:6999] "Electronic check" "Mailed check" "Mailed check" "Bank transfer (automatic)" ...
##  $ MonthlyCharges  : num [1:6999] 29.9 57 53.9 42.3 70.7 ...
##  $ TotalCharges    : num [1:6999] 29.9 1889.5 108.2 1840.8 151.7 ...
##  $ Status          : chr [1:6999] "Current" "Current" "Left" "Current" ...
##  - attr(*, "spec")=
##   .. cols(
##   ..   Gender = col_character(),
##   ..   SeniorCitizen = col_double(),
##   ..   Partner = col_character(),
##   ..   Dependents = col_character(),
##   ..   Tenure = col_double(),
##   ..   PhoneService = col_character(),
##   ..   MultipleLines = col_character(),
##   ..   InternetService = col_character(),
##   ..   OnlineSecurity = col_character(),
##   ..   OnlineBackup = col_character(),
##   ..   DeviceProtection = col_character(),
##   ..   TechSupport = col_character(),
##   ..   StreamingTV = col_character(),
##   ..   StreamingMovies = col_character(),
##   ..   Contract = col_character(),
##   ..   PaperlessBilling = col_character(),
##   ..   PaymentMethod = col_character(),
##   ..   MonthlyCharges = col_double(),
##   ..   TotalCharges = col_double(),
##   ..   Status = col_character()
##   .. )
##  - attr(*, "problems")=<externalptr>
summary(data)
##     Gender          SeniorCitizen      Partner           Dependents       
##  Length:6999        Min.   :0.0000   Length:6999        Length:6999       
##  Class :character   1st Qu.:0.0000   Class :character   Class :character  
##  Mode  :character   Median :0.0000   Mode  :character   Mode  :character  
##                     Mean   :0.1619                                        
##                     3rd Qu.:0.0000                                        
##                     Max.   :1.0000                                        
##                                                                           
##      Tenure      PhoneService       MultipleLines      InternetService   
##  Min.   : 0.00   Length:6999        Length:6999        Length:6999       
##  1st Qu.: 9.00   Class :character   Class :character   Class :character  
##  Median :29.00   Mode  :character   Mode  :character   Mode  :character  
##  Mean   :32.38                                                           
##  3rd Qu.:55.00                                                           
##  Max.   :72.00                                                           
##                                                                          
##  OnlineSecurity     OnlineBackup       DeviceProtection   TechSupport       
##  Length:6999        Length:6999        Length:6999        Length:6999       
##  Class :character   Class :character   Class :character   Class :character  
##  Mode  :character   Mode  :character   Mode  :character   Mode  :character  
##                                                                             
##                                                                             
##                                                                             
##                                                                             
##  StreamingTV        StreamingMovies      Contract         PaperlessBilling  
##  Length:6999        Length:6999        Length:6999        Length:6999       
##  Class :character   Class :character   Class :character   Class :character  
##  Mode  :character   Mode  :character   Mode  :character   Mode  :character  
##                                                                             
##                                                                             
##                                                                             
##                                                                             
##  PaymentMethod      MonthlyCharges    TotalCharges       Status         
##  Length:6999        Min.   : 18.25   Min.   :  18.8   Length:6999       
##  Class :character   1st Qu.: 35.48   1st Qu.: 401.9   Class :character  
##  Mode  :character   Median : 70.35   Median :1397.5   Mode  :character  
##                     Mean   : 64.75   Mean   :2283.1                     
##                     3rd Qu.: 89.85   3rd Qu.:3796.9                     
##                     Max.   :118.75   Max.   :8684.8                     
##                                      NA's   :11
# Step 1: Handle Missing Values
# Check for missing values
colSums(is.na(data))
##           Gender    SeniorCitizen          Partner       Dependents 
##                0                0                0                0 
##           Tenure     PhoneService    MultipleLines  InternetService 
##                0                0                0                0 
##   OnlineSecurity     OnlineBackup DeviceProtection      TechSupport 
##                0                0                0                0 
##      StreamingTV  StreamingMovies         Contract PaperlessBilling 
##                0                0                0                0 
##    PaymentMethod   MonthlyCharges     TotalCharges           Status 
##                0                0               11                0
# Replace missing values in 'TotalCharges' with the median
data$TotalCharges <- as.numeric(data$TotalCharges)  # Convert to numeric
data$TotalCharges[is.na(data$TotalCharges)] <- median(data$TotalCharges, na.rm = TRUE)
# Step 2: Check Data Consistency
# Ensure consistency in categorical variables
unique_values <- lapply(data, unique)
unique_values
## $Gender
## [1] "Female" "Male"  
## 
## $SeniorCitizen
## [1] 0 1
## 
## $Partner
## [1] "Yes" "No" 
## 
## $Dependents
## [1] "No"  "Yes"
## 
## $Tenure
##  [1]  1 34  2 45  8 22 10 28 62 13 16 58 49 25 69 52 71 21 12 30 47 72 17 27  5
## [26] 46 11 70 63 43 15 60 18 66  9  3 31 50 64 56  7 42 35 48 29 65 38 68 32 55
## [51] 37 36 41  6  4 33 67 23 57 61 14 20 53 40 59 24 44 19 54 51 26  0 39
## 
## $PhoneService
## [1] "No"  "Yes"
## 
## $MultipleLines
## [1] "No phone service" "No"               "Yes"             
## 
## $InternetService
## [1] "DSL"         "Fiber optic" "No"         
## 
## $OnlineSecurity
## [1] "No"                  "Yes"                 "No internet service"
## 
## $OnlineBackup
## [1] "Yes"                 "No"                  "No internet service"
## 
## $DeviceProtection
## [1] "No"                  "Yes"                 "No internet service"
## 
## $TechSupport
## [1] "No"                  "Yes"                 "No internet service"
## 
## $StreamingTV
## [1] "No"                  "Yes"                 "No internet service"
## 
## $StreamingMovies
## [1] "No"                  "Yes"                 "No internet service"
## 
## $Contract
## [1] "Month-to-month" "One year"       "Two year"      
## 
## $PaperlessBilling
## [1] "Yes" "No" 
## 
## $PaymentMethod
## [1] "Electronic check"          "Mailed check"             
## [3] "Bank transfer (automatic)" "Credit card (automatic)"  
## 
## $MonthlyCharges
##    [1]  29.85  56.95  53.85  42.30  70.70  99.65  89.10  29.75 104.80  56.15
##   [11]  49.95  18.95 100.35 103.70 105.50 113.25  20.65 106.70  55.20  90.05
##   [21]  39.65  19.80  20.15  59.90  59.60  55.30  99.35  30.20  90.25  64.70
##   [31]  96.35  95.50  66.15  20.20  45.25  99.90  69.70  74.80 106.35  97.85
##   [41]  49.55  69.20  20.75  79.85  76.20  84.50  49.25  80.65  79.75  64.15
##   [51]  99.10  69.50  74.85  95.45 108.45  24.95 107.50 100.50  89.90  42.10
##   [61]  54.40  94.40  75.30  78.90  79.20  49.05  20.40 111.60  24.25  64.50
##   [71] 110.50  55.65  54.65  74.75  25.90  79.35  50.55  75.15 103.80  99.30
##   [81]  62.15  19.95  33.75  82.05  74.70  84.00 111.05 100.90  78.95  66.85
##   [91]  21.05  21.00  98.50  19.45  95.00  45.55 110.00  24.30 104.15  30.15
##  [101]  94.35  19.40  96.75  57.95  91.65  76.50  54.60  89.85  31.05 100.25
##  [111]  85.20  99.80  20.70  74.40  50.70  20.85  88.95  78.05  23.55  19.75
##  [121]  56.45  85.95  58.60  35.45  44.35  25.70  75.00  19.60  70.45  88.05
##  [131]  71.15 101.05  84.30  23.95  99.05  45.65  68.55 108.15  86.10  19.70
##  [141]  80.90  84.15  64.25  56.00  82.40  73.90  20.60  19.90  70.90  89.05
##  [151]  45.30  84.25 104.40  81.95  94.85  20.55  24.70  74.45  76.45 105.35
##  [161]  29.95  79.25  24.80  51.80  30.40  19.65  56.60  71.90  91.00 109.70
##  [171]  19.30  96.55  24.10 111.35 112.25 101.90  80.05 105.55  78.30  68.85
##  [181]  79.95  55.45  79.90 106.60 102.45  46.00  25.25  20.00  86.80  58.75
##  [191]  84.20  80.00  70.15  24.75  50.05  19.35  50.60  81.15  85.30 108.00
##  [201]  93.50  84.60  20.25  25.15  29.60  73.15  86.60 109.20  54.80  75.35
##  [211]  65.00  48.55  99.00  70.40  40.20  83.70  19.85  59.55 115.10 114.35
##  [221]  44.60  45.00  41.15 106.90  49.85 113.30  88.10  24.90 105.00  94.45
##  [231]  59.75 107.05  70.60  85.40 105.05  64.95  55.00  55.15  51.20  25.40
##  [241]  54.45  95.15  76.00  70.00  74.50  44.85  76.10  61.20  89.35  76.05
##  [251] 100.80  74.55  73.60  64.90  90.40  60.30  81.85  74.90  75.55 101.15
##  [261]  78.75  19.25 115.05  69.35  80.60 110.05  80.30  93.15  91.50  82.45
##  [271]  60.00  44.80  48.60  60.05 102.70  82.90  70.35  35.90  82.65  19.20
##  [281]  94.90  73.85  75.80 104.60  88.15  94.80 103.40  85.75  67.45  20.50
##  [291]  72.10  44.95  97.00  62.80  89.15  84.80  41.90  80.25  54.10 105.25
##  [301]  30.75  97.10  98.80  50.30  75.90  96.50  59.95  19.15  98.65 112.60
##  [311]  85.65  35.75  99.75  96.10  85.10  25.35 104.95  89.65  86.75  86.20
##  [321]  50.65  64.80  90.85 108.10  85.45  54.75  44.00  95.60  44.30  95.05
##  [331] 109.90  73.95  20.05  99.45  55.90  95.40  93.95  81.35  24.45  74.95
##  [341]  87.35  70.65  73.25  98.70  83.30  69.85 100.55  40.70  51.65 105.10
##  [351]  75.60  58.25  65.20  53.45  45.40  44.45 114.05  55.05 112.95 101.55
##  [361] 114.65  80.40 105.90  69.55  25.05  94.75  69.75  60.20  81.05  24.40
##  [371]  92.90  80.80  75.10  69.45 116.05  40.05 102.10  89.70  55.95  70.05
##  [381]  53.60  75.70  69.00  81.45 108.50  83.55 100.15  88.60  52.55  74.35
##  [391]  59.00  64.05  43.75  60.90  28.45  99.70 116.25  80.70  84.05  79.45
##  [401]  94.10  78.00  94.20  80.50  94.30 106.45 105.45  54.30  75.20 105.40
##  [411]  51.60  85.50 100.05  91.25 115.75  94.70  21.10 107.15  85.00  89.55
##  [421]  81.55  58.45  95.65 113.10  58.95  19.55  86.05  86.30 110.30 115.60
##  [431]  25.60  80.35  68.75  70.20  49.30 107.25  23.60  99.50  64.30  70.85
##  [441]  73.50  40.40 100.30 110.85  98.05  70.50  94.55  19.00  89.20  85.70
##  [451]  63.25  20.10  99.15 111.90  83.50  45.60  61.65  54.85  65.55  90.35
##  [461]  74.25 108.65 109.55  86.65  81.00  47.85 114.55 109.80  48.85 102.85
##  [471]  87.55  78.55  34.55  92.05  85.05 111.65 110.75  20.35  54.55 104.55
##  [481]  85.25  45.70  69.65  89.50  74.60  95.10  88.85  78.80  19.50  57.80
##  [491]  25.55  75.05  24.85  49.15 110.35  24.55  34.70 107.95  81.40  73.80
##  [501]  64.40 103.75  71.10  49.90  24.60  30.10  83.40  20.45  75.25  85.15
##  [511]  50.15  84.95  66.50  63.30  83.15  84.90 104.65  80.10  86.00  50.35
##  [521]  45.35  94.50  21.25  26.25  80.85  91.70  74.20  87.25  75.50  79.05
##  [531]  90.15 110.45 101.00  80.45  98.55  44.05 110.80 114.95  56.70  80.15
##  [541]  71.35  85.90  20.80  89.25  70.30  35.80  78.85  93.35  88.90  95.80
##  [551] 110.65  40.30  82.00 107.00  73.35  52.20  40.60  60.85  78.40  59.85
##  [561]  76.90  67.65  64.20  81.70  75.65  23.80  85.35  76.80 108.55 101.30
##  [571] 103.25 104.00 111.20  88.00  79.15 103.10  63.95  25.80  89.45  90.95
##  [581]  74.10  88.80  93.25  71.40  44.40 100.00  30.85  84.85  33.15  92.00
##  [591]  89.80 115.80  64.35  50.80  89.00  93.40  73.65  94.65  39.00  85.55
##  [601]  26.40  98.20  97.55  34.80  60.15  64.75 110.10  83.90 111.25  84.35
##  [611]  91.20  89.30 103.85  81.10  81.20 116.10  98.90  98.30  93.85 105.60
##  [621]  56.40  65.35  72.85 106.10  25.20  73.55  75.40  24.15  79.70  76.30
##  [631]  79.40  86.45  33.60  83.25 108.05  65.50 104.10  91.35  55.10  44.70
##  [641]  25.45  56.75  81.75  29.80  77.35  96.00  90.55  70.10  30.35  75.95
##  [651]  69.90  54.95  23.75  43.80  24.35  26.10  95.35  95.85  90.10  68.95
##  [661]  99.55  58.65  95.90  49.50  57.45  53.65  51.05  54.35  84.70 100.60
##  [671]  83.75  88.30  71.60  92.10  23.65  25.10 114.70  90.45  54.25  74.00
##  [681]  50.25  43.65  35.50  80.75  39.50  90.60 112.40  50.20  62.25  55.70
##  [691]  54.00  96.65  24.50 114.50  98.85  25.75  80.95  74.30  87.65 100.45
##  [701] 107.45  68.50  80.55  81.25 105.20  97.45  39.60  59.50  70.55  82.50
##  [711]  61.60 105.65  74.65  66.25 104.05  65.15  56.80  35.55  35.60  60.25
##  [721]  40.35  18.85  24.65  18.70  97.95  31.35  72.35  89.75  82.70  53.80
##  [731]  51.55 114.00 100.40 101.35  49.80  53.75  93.45  87.90  61.05  99.25
##  [741] 104.85  69.15  50.45 104.50  49.40  94.25  25.00  69.40  66.35  65.75
##  [751]  69.25  45.85 100.85  87.20 105.85  76.95  96.15  58.70  28.50 105.15
##  [761]  45.05 103.20  79.30  30.90  34.20  95.25  51.25  89.60  95.20 110.15
##  [771] 115.55  88.20  99.40  60.70  20.95 114.85  68.80  84.45  44.75  57.60
##  [781] 110.60  58.20  85.60  97.65  45.10  70.95  20.90  66.70  65.85  56.25
##  [791]  35.40  56.05  54.70  73.05 100.75  49.65  65.65  60.95  88.35 111.45
##  [801]  78.45  41.05  82.15  84.40  95.30  82.30  66.80  98.45 102.50  86.55
##  [811]  58.35  85.80  73.00  82.85  35.00  23.30  25.30  44.55  92.55 101.45
##  [821]  55.50 113.05 101.10  74.15  64.85  99.95 109.40  91.40  49.00  97.80
##  [831]  55.80 111.15  48.80 106.05 108.30  49.20  73.75  92.30  88.65  98.75
##  [841]  95.95 106.00 104.70  65.10  96.85  99.20  96.70 106.80  57.75  79.50
##  [851]  98.15  55.35 102.15  88.45  76.65  68.60  92.60  42.60  43.55 109.85
##  [861]  56.20  18.40  90.00  75.75  69.95  50.00 104.75  81.50  67.25  34.65
##  [871]  67.80 111.40  46.30  60.65  98.60  71.70  36.00  48.95  53.50 109.05
##  [881]  26.30  77.95  26.00  96.90  64.65  95.75 111.55  60.50  87.40  50.95
##  [891]  59.45  29.05  97.20  98.25  59.20 102.60  29.45  87.10  84.65  79.10
##  [901]  34.40  18.80  90.80 105.95  70.80 108.80  96.05  76.85 115.65 103.15
##  [911] 113.60  45.75  58.85 114.45  35.65  69.10  82.75  55.25  61.35  76.75
##  [921]  83.80  71.05  81.65  69.60  19.05  44.25  87.15 104.45 116.45  84.75
##  [931]  89.95  48.70  96.60  54.90 115.15  58.55 113.20  90.50  79.00  48.75
##  [941]  91.15 104.35  66.05  71.65  92.20  78.10  61.50  91.05  26.20  43.85
##  [951]  38.55  53.10  64.45  76.35  98.35  51.35  20.30  54.20  90.65  50.90
##  [961]  63.55  47.95  66.40  35.10  46.20  45.15  43.30  57.15  58.90  73.20
##  [971]  45.95  50.50  93.80 114.10  88.55  44.65  60.40  72.65  31.10  43.95
##  [981]  86.50  50.40  78.50  30.50  64.60  51.10  60.35 107.35 111.80  71.50
##  [991]  25.50  91.85  75.45  34.25  78.60  93.55  90.70  90.90  29.20  93.30
## [1001] 108.85  46.35  67.85  45.20  47.15  80.20  61.80  86.25  95.70 116.85
## [1011] 105.75  77.40  96.80  47.60  83.35  92.95  76.40  59.10  55.85  84.10
## [1021]  93.20  33.65  39.70  29.50  79.55  94.05  90.75  59.40  61.90 118.65
## [1031]  75.85  42.35  48.15  86.15  72.90  50.10 102.65  31.20  91.30  21.20
## [1041]  63.85  61.95  85.85 104.90 111.30  99.85 108.95  39.10  34.60  59.70
## [1051]  78.35  71.45  35.70  93.05  65.60  52.70  52.15 113.65  86.85  91.55
## [1061] 109.15  48.20  71.55  93.90 108.40  47.80  97.70  63.70 104.30  73.45
## [1071]  89.40  83.05 102.05  26.80 114.90 106.40  46.10  67.40  72.75  39.20
## [1081] 117.15 112.55  90.30  61.25  26.05  29.65 105.30  59.25  30.25  93.00
## [1091]  96.25  33.55  39.90  82.95  59.80  61.40 103.35  59.65  77.15  35.25
## [1101]  98.40 100.70  60.45  96.40  91.45  97.75  62.70 107.20 113.40  40.55
## [1111] 111.95  70.75  76.15  26.90  84.55  45.45  93.70 108.25  94.60  65.25
## [1121]  88.40 107.65 109.60  34.50  68.35  51.00  86.40 113.00  40.65  94.95
## [1131]  33.50  81.80  55.55  59.30  66.10  52.10  47.40  79.65 100.65 116.75
## [1141]  38.90  87.95  19.10  60.60  25.65  53.95  29.35  44.90  92.65  43.70
## [1151]  72.60 106.65  72.95  77.20  41.35  67.60 115.00  63.15  29.10  98.10
## [1161] 108.90 109.65 100.95  36.65 103.90  24.05  26.35  61.15  48.25  99.60
## [1171]  63.80 101.40  63.75 109.25  91.10  22.95  87.00 102.95  64.00  71.00
## [1181]  26.45  63.40  63.90  43.35  92.35 103.05 116.00  40.25  24.00  92.85
## [1191]  31.00 113.75 109.30  70.25  69.05  33.90  34.00  38.60  34.05  43.25
## [1201]  48.35  69.30  49.35 108.60  30.30 103.30  38.10  68.65  45.80 105.70
## [1211]  53.30  77.85  87.05  79.80  74.05  25.95 107.90  38.85  30.60 109.10
## [1221]  72.80 101.75  64.10  46.25 100.20  48.90  81.30  36.45  79.60 117.60
## [1231]  65.80  77.30  71.95  56.30  29.90  49.45 106.55  54.50 106.75  62.10
## [1241] 101.80  87.45  68.25  57.20  88.50 117.20 103.45 109.95 106.30  62.05
## [1251]  44.15  53.90  44.10  90.20  50.85  83.20  57.50  94.15  55.60  68.40
## [1261] 107.60  61.55  53.40  87.80  83.00  92.15  69.80 107.75  71.30  60.80
## [1271]  35.35  61.45  83.85  45.90  51.30 106.15  77.80  83.45  46.60 104.25
## [1281] 109.50 112.10  68.05  96.20  23.40  43.90  50.75  51.70  65.40  40.00
## [1291]  40.75 103.95  73.70  87.30  72.25  71.25 113.80  81.90 111.50  30.55
## [1301]  54.15 108.75 102.00  18.25  35.05 106.50  58.50 109.45  29.15 110.90
## [1311]  77.75  56.35 109.75  49.10  88.70 112.90  78.65  86.95 102.55 106.85
## [1321]  56.10 118.60 115.50  35.20 115.25  66.30  42.90  57.65  57.55  29.25
## [1331] 111.75 107.70  38.50  66.00 101.50  86.70 114.30  60.75  65.70  63.35
## [1341]  65.45  67.50  78.15  68.90  59.15  67.95  95.55  62.85  39.30  36.25
## [1351]  23.90 103.65  39.85 117.35  67.05 101.25  28.60  73.30  23.05 116.80
## [1361] 108.20 112.20  36.10  94.00 110.20  65.90  52.50  88.75  92.40  49.60
## [1371]  97.05  40.10  86.35  82.10  78.25  48.65  91.80  62.45  98.00  78.20
## [1381]  53.35  40.15  68.15  92.45  92.70  96.95  67.75  55.75 114.60 118.75
## [1391]  24.20 102.80 115.85 117.80 116.60  65.05  92.50  18.75  93.60  36.15
## [1401]  58.40 107.40  61.30  66.90 110.70  38.25  39.55  23.15  72.45  60.10
## [1411] 113.15 106.25 116.15  54.05  97.25  41.10  33.45  39.40  76.25  46.40
## [1421]  63.05 117.45  59.05  76.55  62.50  29.40 113.45  49.70 107.55  23.85
## [1431]  39.15  49.75  18.90  63.60  53.00  36.85  45.50  30.05  52.30  82.35
## [1441]  77.00 118.35  30.45  66.20 116.50 104.20  34.95 111.10  58.00  21.15
## [1451]  87.70  67.20 114.75  77.90  68.70  86.90  56.90  66.75  33.70  40.45
## [1461]  83.65  64.55  93.65 116.95  52.00  39.35  62.65  72.15  65.30 101.60
## [1471]  71.80  48.45  51.75  42.40  97.90 116.40  31.65  39.05 103.00  53.55
## [1481]  26.50  40.90  62.55  77.55  53.15  51.45  56.55  52.85  21.30 102.90
## [1491]  93.75 109.00  68.10  60.55 102.40  96.30  34.30  51.40  71.85  81.60
## [1501]  88.25  97.35 106.95  41.60  91.60 112.75  34.85  56.65  61.75  87.60
## [1511]  71.75  83.60  29.30 114.20  36.50  76.60  35.30  23.45 113.95  29.70
## [1521]  39.95  55.40  47.05 110.25  66.65 118.20 102.25  25.85  91.95  72.20
## [1531]  51.50  77.50  53.70  46.05  39.45 110.55 100.10  61.00  83.95 116.20
## [1541] 113.35  77.65 116.30  43.60 101.95  68.30  48.40 101.70  56.85  73.10
## [1551]  87.75  21.45  43.45 101.85 105.80 102.35  51.15  41.95 106.20 116.55
## [1561] 103.50  82.55  66.60  44.50  18.55  23.50  37.70  36.05 112.35  56.50
## [1571] 117.50  62.30 103.60  38.80  91.75  67.70  35.15  61.10  68.45  43.05
## [1581]  72.00 108.35
## 
## $TotalCharges
##    [1]   29.850 1889.500  108.150 1840.750  151.650  820.500 1949.400  301.900
##    [9] 3046.050 3487.950  587.450  326.800 5681.100 5036.300 2686.050 7895.150
##   [17] 1022.950 7382.250  528.350 1862.900   39.650  202.250   20.150 3505.100
##   [25] 2970.300 1530.600 4749.150   30.200 6369.450 1093.100 6766.950  181.650
##   [33] 1874.450   20.200   45.250 7251.700  316.900 3548.300 3549.250 1105.400
##   [41]  475.700 4872.350  418.250 4861.450  981.450 3906.700   97.000  144.150
##   [49] 4217.800 4254.100 3838.750 1426.400 1752.650  633.300 4456.350 1752.550
##   [57] 6311.200 7076.350  894.300 7853.700 4707.100 5450.700 2962.000  957.100
##   [65]  857.250  244.100 3650.350 2497.200  930.900  887.350   49.050 1090.650
##   [73] 7099.000 1424.600  177.400 6139.500 2688.850  482.250 2111.300 1216.600
##   [81]   79.350  565.350  496.900 4327.500  973.350  918.750 2215.450 1057.000
##   [89]  927.100 1009.250 2570.200   74.700 5714.250 7107.000 7459.050  927.350
##   [97] 4748.700  113.850 1107.200 2514.500   19.450 3605.600 3027.250 7611.850
##  [105]  100.200 7303.050  927.650 3921.300 1363.250 5238.900 3042.250 3954.100
##  [113] 2868.150 3423.500  248.400 1126.350 1064.650  835.150 2151.600 5515.450
##  [121]  112.750  229.550  350.350   62.900 3027.650 2135.500 1723.950   19.750
##  [129] 3985.350 1215.650 1502.650 3260.100   35.450   81.250 1188.200 1778.500
##  [137] 1277.750 1170.550   70.450 6425.650  563.650 5971.250 5289.050 1756.200
##  [145] 6416.700   61.350   45.650 1929.950 1071.400  564.350  655.500 7930.550
##  [153] 5215.250  113.500 1152.800 1821.950  419.900 1024.000  251.600  764.550
##  [161] 1592.350  135.200 3958.250  233.900 1363.450  273.000 6254.450 2651.200
##  [169]  321.400 3539.250  242.800 1181.750 5000.200  654.550  780.200 1145.700
##  [177]  503.600 1559.250 1252.000   29.950   45.300  662.650 2453.300 1111.650
##  [185]   24.800 1023.850   82.150  244.800 2379.100 3173.350  531.000 1375.400
##  [193] 8129.300 1192.700 1901.650  587.400 6519.750 8041.650   20.750 2681.150
##  [201] 1112.300 7405.500 1033.950 2958.950 2684.850 4179.200   79.900 1934.450
##  [209] 6654.100   84.500   25.250 1124.200  540.050 1975.850 3437.450 3139.800
##  [217] 3789.200 5324.500  624.600  268.350 1836.900  179.350  219.350 1288.750
##  [225] 2545.750   55.200 2723.150 4107.250 5760.650 4747.500   84.600 1566.900
##  [233]  702.000  114.100  299.050 1305.950 1120.300  284.350 6350.500 7878.300
##  [241] 3187.650 6126.150  731.300  273.400 2531.800 1074.300   48.550 4298.450
##  [249] 4619.550  147.150   40.200 2633.300  193.050 4103.900 7008.150 5791.100
##  [257]   80.550 1228.650  132.200 1364.300 4925.350 1520.100 5032.250 5526.750
##  [265] 1195.250 2007.250 1099.600 1732.950 1511.200 3450.150 2172.050   70.600
##  [273]  401.100 5624.850 1339.800  771.950  244.750  322.900  498.250   25.400
##  [281] 3687.750 1779.950 1783.600  927.150   70.000  606.550  435.400 1712.700
##  [289] 2021.200 1940.800  567.800  220.350   20.250 5436.450 3437.500 3015.750
##  [297]   73.600 1509.800  396.100  356.650 4109.000 3141.700 1229.100 2303.350
##  [305] 2054.400 3741.850 3682.450   19.250 1886.250 4895.100  341.600  415.550
##  [313] 5686.400 1355.100 3058.650 2231.050 3236.350 4350.100 4264.000   44.800
##  [321]  422.300 4176.700 5138.100  880.050  139.050  973.650 1470.050  739.350
##  [329]  161.950 4422.950  511.250  155.800 5293.950 4759.850 6148.450 3565.650
##  [337] 6603.000 1830.100 6223.800 4508.650 1328.150  865.000   72.100  168.200
##  [345] 1303.500  996.850 6430.900 2278.750  681.400  574.350  371.900  840.100
##  [353]  846.000  889.000 6823.400  805.100 4016.750   83.750 3959.150 2878.550
##  [361]  945.700 1373.050  492.550 1406.000   19.150 6962.850 8126.650  690.250
##  [369]  181.500  830.800 5608.400 3646.800 3662.250   25.350 2566.500 5308.700
##  [377] 1410.250 3339.050   50.650 4732.350   90.850 5067.450  214.750 4874.700
##  [385] 2348.450 4063.000   44.000 2595.250 2309.550   89.300  367.550 3944.500
##  [393] 5965.950 3694.700 2524.450 1803.700  415.100  624.150  237.700 7007.600
##  [401] 3848.800  419.400 1468.750 5812.000 2861.450   19.900   19.600  233.700
##  [409] 1066.150 2149.050 4473.000 3545.050 1195.750 6858.900 1024.700 1845.900
##  [417]   75.300  132.250  515.450 2830.450 1110.500  449.300 2838.550 5376.400
##  [425]  858.600 1395.050 3975.700 1182.550 4784.450  119.500  518.900  899.450
##  [433] 1183.800  720.050 8468.200 3161.200   55.050 1882.550 5070.400 6049.500
##  [441] 1166.700 2937.650 6396.450   69.550 1270.250  759.550 7611.550 1642.750
##  [449] 1545.400 3582.400 2227.100 1417.900 2494.650 2768.350 2369.300   38.000
##  [457]   75.100  100.900 1614.050  385.900  673.250 8404.900 2799.750 6538.450
##  [465] 6588.950  868.100  734.350  330.600   55.000  564.400 1315.350 1861.500
##  [473] 2747.200  554.050  453.400  994.800  225.750 2145.000 1671.600 8003.800
##  [481]  680.050 6130.850 1415.000 6201.950 1397.475   74.350 6597.250  114.150
##  [489]  139.400 3902.600   20.400  903.600 1785.650 1397.650  131.050 1238.450
##  [497] 3899.050 5676.000 4543.150 4326.800 5502.550 1782.400  851.800  167.500
##  [505]  502.850   19.850 1818.300 6300.150  334.800 5916.950 2852.400 4131.950
##  [513] 1546.300  302.600 1929.350  265.450 6989.450 1442.000 4713.400 1758.600
##  [521] 3480.000 4738.300 8399.150 5430.350  686.950 5706.300  490.650 1360.250
##  [529]  174.450 7379.800   85.000 1021.750 5029.050 1955.400 6744.200 4946.700
##  [537] 8248.500  601.600   19.550  834.100  597.000 2647.200 3266.000 6744.250
##  [545] 5265.500  311.600 7966.900 8220.400 1153.250  514.750 2596.150 3808.000
##  [553] 2708.200  760.050   49.300 6033.300   89.050  516.150 5861.750  445.950
##  [561] 4973.400 1667.250 5357.750 3527.600  422.600 1103.250 2754.000  697.250
##  [569] 5614.450 3204.400 4747.650 3082.100  597.900 3365.400   38.800  233.550
##  [577]  346.200   19.000   61.700   85.700 3342.450   85.100 7422.100 6668.050
##  [585] 8071.050 1174.800 5435.000 2438.600   45.600  713.750  916.150  237.200
##  [593] 4614.550 1414.450 1170.500   47.700 4859.250 4903.200 3608.000 6094.250
##  [601] 3084.900 2356.750 8306.050 6786.400  248.950  663.050 1357.100 4860.350
##  [609] 3418.200  631.400  186.300 6976.750 4884.850  522.950  362.600 5755.800
##  [617] 3355.650  406.950  137.600 2395.700 1968.100 6819.450 7943.450 4547.250
##  [625] 4687.900 2473.950 6562.900  176.300 2236.200 6985.650 3109.900 4911.350
##  [633] 5794.650  855.300 1620.200 2499.300   89.550 4287.200  394.850 1899.650
##  [641]   45.700 3442.150  161.500 1732.600  222.300   74.600  655.300  475.250
##  [649]  164.300  865.100 6132.700 3597.500   35.900  697.650   96.050  428.700
##  [657]   20.050 4459.150 1167.600  238.100  145.150 1453.100  191.050 4039.300
##  [665] 1039.450 1336.100   75.050  493.400 2550.900 7246.150 1203.950   62.250
##  [673]  313.600 3775.850   80.000 4616.050  195.650 4188.400   71.100   49.900
##  [681] 1266.400   91.100 1623.400 4149.450   20.450 2344.500 1013.050  270.700
##  [689]  417.000   20.650 6316.200  168.150 4018.050 4811.600 4189.700 2848.450
##  [697] 2516.200   33.600  208.450 2015.350 3739.800 2964.000 2263.400 2211.800
##  [705] 1683.700 1519.000 1164.050 1710.900 4245.550 4145.900 2664.300 1277.500
##  [713] 5589.300   34.750  381.300  141.500 3105.550  204.550  605.900  356.100
##  [721] 2758.150 4805.650 3941.700   92.750 1901.050 5730.700 2423.400 1653.450
##  [729] 3327.050 7085.500 3344.100 6697.350 2879.900  137.100 1008.550 1551.600
##  [737]  202.150 7882.250 8196.400  202.900  855.100 5817.000 1652.950 5600.150
##  [745]  515.750  190.500 1842.800 1253.800   57.200 1269.550 6563.400   20.800
##  [753] 1907.850  208.850 4758.800 1292.600  363.150 1600.250  275.700 3089.100
##  [761] 1175.600  237.300 1444.650  454.150 3036.750 8065.650   92.500  184.650
##  [769] 6152.300   89.500 5154.500  220.450 1510.300   52.200 2588.950 4874.800
##  [777] 3983.600 2003.600 1832.400 4908.250 3590.200 5023.000  146.600 2339.300
##  [785]  298.700  143.650 2548.650  507.400   20.000 6125.400 5411.400 1058.250
##  [793]  903.800 3009.500  489.450 5468.450 1058.100 7616.000 4113.100 6017.650
##  [801] 7250.150 1108.200  938.650   94.150 2088.050  178.700 5656.750 2317.100
##  [809] 5986.450 6751.350 3566.600 4889.300  318.100 1563.950 1430.250  644.350
##  [817]  372.450 5453.400 1442.600 5610.700  963.950 5222.300 3340.550  292.800
##  [825] 5774.550 4487.300   44.400 2854.950  905.550 5509.300 7589.800  229.600
##  [833]  394.100   89.900  295.950 5459.200  444.750 6782.150 6510.450 8476.500
##  [841] 4461.850   62.000  352.650 1424.900 6413.650 6309.650   50.800 5898.600
##  [849] 4719.750  457.300 5822.300 1463.500  307.400 2104.550  319.150 2337.450
##  [857]  104.300 5084.650  121.250 7015.900 5598.000 1269.100 3027.400 4634.350
##  [865]  113.950 1582.750 3077.000 4039.500 1665.200 1043.300  504.200  497.550
##  [873] 7511.650 1782.000  609.650 2857.600 3247.550 6215.350 2823.000 5017.900
##  [881] 2619.250   24.600 4965.100 2679.700 8310.550 5682.250 1120.950 4914.900
##  [889]   27.550  923.500 1625.650 6068.650 5398.600  918.600  234.850 1231.850
##  [897]  170.900 7984.150  688.650 1288.300 7848.500  267.000 1798.900   73.550
##  [905] 1643.550 4807.450 2193.000 2239.400 1505.900  255.350 1189.400 4786.150
##  [913] 1820.900 2404.150  205.050  952.300 7039.450 2538.050 1212.850 2651.100
##  [921] 1304.800  360.100  435.450  308.050  434.500 7118.900  320.450  531.550
##  [929]  382.200 2001.000 4919.700 5645.800  215.800   77.600 2896.550 3395.800
##  [937]  759.350   85.150  535.550 1253.150  955.150 2162.600   44.700 1813.350
##  [945]  245.150 2028.800 2723.750  365.800  551.950 4054.200  832.350  112.300
##  [953]   60.650 5550.100  174.800   90.550 4733.100 4048.950 1359.700 4542.350
##  [961] 7532.150   69.900  888.650 6383.350 1916.000  413.000  808.950 1886.400
##  [969]   86.600 1679.250 2656.500  540.950  537.350  678.800 4513.650 1423.850
##  [977]  555.400  225.550  268.450 2917.500 2416.100  424.450 1492.100  132.400
##  [985]  660.900 1893.950  284.900  784.250  417.700 5016.250 1612.750  119.750
##  [993] 3204.650  485.200  160.850 4145.250  827.450   49.500  990.850  696.350
## [1001] 5585.400 1601.200  162.450  470.200 2066.000 1426.450  392.500 3861.450
## [1009] 2552.900 6668.350  819.400 4615.250 2070.600  273.750 3557.700 1957.100
## [1017]  729.950 1416.750 5924.400 1697.700 7849.850  649.400 4557.500 3013.050
## [1025] 1266.100  360.350 1046.500 2347.900  447.750 4209.950 3877.650  152.300
## [1033]  572.200   19.650  526.950  552.700 3208.650  210.750 3706.950  620.750
## [1041]  412.500  832.050  185.550 1943.200  505.900 8046.850 1815.300  612.950
## [1049]  795.150 2169.800  973.100 2210.200 4853.750 1055.900  144.550 1304.850
## [1057]  713.000   21.100 5580.800 1497.900 4527.450 4590.350  200.200  614.450
## [1065] 4564.900  171.150 1012.400  940.350 1047.700 2766.400 1622.450 1129.350
## [1073] 5680.900 2243.900 4523.250 7159.700 2839.950  580.100 2178.600 6038.550
## [1081]  259.400  324.150  417.650 5637.850  839.400  769.100 6253.000 1641.800
## [1089] 1678.050 2058.500 2424.500  387.200 6293.450 2839.650 3145.900 2200.700
## [1097]  914.400 4577.750 4997.500 4144.800 1493.550 4179.100  893.550 1611.000
## [1105]  593.050 4284.800  544.550 1533.800  529.800 3865.600  941.000 1133.650
## [1113]   48.350 2070.050 8333.950 1209.250 1396.250  723.350  228.650 1161.750
## [1121]   98.350  775.300 1074.650   35.550 2324.700 1072.600  170.500  196.900
## [1129] 1162.850 1677.850   18.850  370.400 3410.600 1138.800 5264.250 1005.700
## [1137] 5936.550 5475.900  224.050 2326.050   31.350 4991.500 1052.400 5831.200
## [1145]  510.800  283.950 1295.400 3011.650 8093.150 5610.250 3217.650  773.200
## [1153] 1029.350  669.450 3593.800 1553.950 3953.150 1971.150 1236.150 3196.000
## [1161] 4872.200 1500.500   60.150 3478.750 7413.550 3532.000  256.750 3887.250
## [1169] 2490.150  593.450 3510.300  765.450 1259.350 5538.350  340.850  844.450
## [1177] 1348.950 3778.000  611.650 4867.950 1505.050  467.850   74.900  194.200
## [1185]  571.450   80.250 5253.950 1149.650  740.800  521.350 1412.650 1532.450
## [1193]  250.050 1090.600 1446.800 2282.550 4300.450 1111.200  190.100 4447.750
## [1201]  143.350   45.850  810.200 1830.050 2820.650 4847.350 4729.300 4017.450
## [1209] 1398.600 2564.300 1685.900 5826.650 6066.550  228.400  270.200 1529.200
## [1217]  168.600  536.350 1888.450  629.350  289.300 2117.250 4730.900 2033.050
## [1225]  987.950   45.050 5744.350   75.800  523.150 4805.300   59.050 6110.750
## [1233] 1596.600 1046.200 4424.200  194.550  612.100 6127.600 6671.700 5264.300
## [1241]  303.700 4818.800 6448.050 7159.050 1574.500 2879.200   86.050 4159.450
## [1249] 6638.350 3112.050 7168.250 1326.250 2234.550  495.150 8317.950  679.800
## [1257]   62.800 7544.000 1188.250  676.700   74.100 3242.500 1240.150 4111.350
## [1265] 5899.850  632.950 5193.200 7530.800  270.950 5460.200 1614.200  402.500
## [1273] 1367.750  483.700 7962.200 3810.800 3533.600 1396.900 1345.550 1646.450
## [1281] 8127.600 2680.150 1281.000 1553.900 3207.550 2049.050 3629.200 5124.550
## [1289] 3474.450  202.300  147.500   86.350  579.000 3131.550 3928.300  187.750
## [1297] 1710.150   76.350   69.250 5961.100 1221.550 1496.450 1292.200   25.150
## [1305] 1713.100 1748.900   25.200   96.450 1114.550  609.100 7133.250  169.450
## [1313]  141.600 4688.650  563.050 5985.000 1258.600  373.500  857.200 2553.350
## [1321] 4322.850  250.800 4549.050 1359.500 1639.300  178.850  633.850 5315.100
## [1329]  735.500  889.900 1290.000  330.050  237.950 6474.400 4421.950 2452.700
## [1337]  813.850 4904.850 4484.050 2033.850  538.200   79.200 2192.900 3858.050
## [1345]  854.800  347.400 5815.150 3970.400 3058.150 6145.200  129.200 1165.900
## [1353]   49.950 1554.000 4904.250 5632.550 1643.250  740.550 3217.550 4888.200
## [1361] 2440.250  620.550   20.350 6840.950 3001.200 6254.200  319.600 1938.050
## [1369]  294.500   58.300  442.850  553.000  546.450  797.100   76.000 1673.800
## [1377]  343.450 7412.250 4039.000  170.850 2948.600 1308.400 6078.750 6603.800
## [1385] 3166.900  865.750 6373.100 1177.050 5985.750  732.500 7869.050 1504.050
## [1393]  936.700  741.400 6585.200 3122.400   50.450 1088.250  615.350 2908.200
## [1401]  739.900  593.850 1132.750 7227.450  193.600 1291.350 2023.550  349.650
## [1409]  153.950 5458.800 5244.450  154.550 4507.150 2031.950   50.050  332.450
## [1417]  473.900  106.800  152.600 1199.400 2555.050 2979.200  654.850 3834.400
## [1425] 1534.750 4586.150   20.550 5941.050  424.150 2234.950  666.750  281.000
## [1433]  547.800  571.150 1756.600 5731.450 3475.550  156.850 2683.200  896.750
## [1441] 2407.300 4456.650 6998.950   36.800 6547.700 4346.400 2265.000 1309.150
## [1449] 4754.300 1235.550 3562.500 7213.750 2082.950  102.750 5914.400   51.250
## [1457] 1282.850 4738.850 1775.800  795.650  145.000 4993.400   61.450 4018.550
## [1465] 1146.650 6081.400 1478.850  243.650 2633.950 4735.350 1247.750 3794.500
## [1473] 1008.700 2130.550 1313.550 5727.150 1372.900 1203.900   25.800 1215.100
## [1481] 2877.050 1579.700 5514.950   96.100   72.400   55.250 2443.300 1970.500
## [1489]  335.400 7002.950  158.950  293.150 1493.750 1093.400 1057.850  190.050
## [1497]  882.550  300.400 1025.950 1436.950  475.000 5388.150 5730.150  819.550
## [1505]  217.100 4896.350 1434.100  937.100  330.150 1474.900 6536.500 1128.100
## [1513] 6873.750 2199.050  457.100  566.500 2471.600 3107.300  518.300 5769.750
## [1521]   91.700  832.300 1555.650 1790.600   74.950  246.600  261.650  898.350
## [1529] 4509.500 5480.250  653.150 1183.050  639.450  478.750  127.100 4391.450
## [1537]  270.600 6710.500 3975.900 1704.950  415.950  950.200 1497.050  780.150
## [1545] 3512.150  273.250 3517.900 3375.900 7508.550 1245.050 5347.950  493.650
## [1553] 1263.850  385.550 3384.000   84.200 1638.700  165.400  120.250 4473.450
## [1561]  520.550 5717.850   88.800 4312.500 2755.350  994.550 6511.250 1218.650
## [1569] 7447.700 1169.350  279.500 5720.350 3121.450 6468.600 5918.800  675.600
## [1577] 3521.700  923.100 1110.350 1611.650 2293.600 5553.250   44.750 3029.100
## [1585] 3231.050 5129.450 5508.350  655.900 1191.200  866.400 2627.200 4741.450
## [1593] 4009.200 1463.450 5082.800   43.800 3707.600 1133.700 1983.150 5746.750
## [1601]  770.600  134.050 6230.100  573.050 3419.300 3587.250 3541.350 3801.300
## [1609]  868.500 4859.100 1439.350   85.800   79.100  592.750 1185.950   18.800
## [1617]  134.500 4921.200  901.250 5341.800 4859.950 1139.200 7082.450  324.600
## [1625] 4812.750 4399.500  663.550  174.650  321.700 5125.500  548.900   50.150
## [1633] 7031.300 5016.650 4594.950  611.450 2384.150  319.850  153.300 7035.600
## [1641]  344.200 1431.650 1849.200 6083.100  426.650 1655.350 1943.900 1616.150
## [1649]  314.950  804.850  465.700 6669.050  947.750 8375.050   34.700 3770.000
## [1657]  264.800 4707.850 6152.400  958.100  943.000 6615.150 2200.250  425.100
## [1665]   99.750 5044.800 6743.550  196.400  299.700 2093.900  417.750 1725.400
## [1673] 3169.550 5233.250  967.850  438.050 1421.900  323.150  318.600  163.700
## [1681]  639.650 2928.500  100.350  273.200 1608.150 1441.950 2168.150 3618.700
## [1689] 5692.650   59.850   69.600 5969.300   19.050  418.800 8100.550   19.500
## [1697]  313.450 6130.950  745.300 1212.100  183.750 1583.500 4162.050 1119.900
## [1705] 8013.550  264.850 1102.400 5832.000 4304.500 1178.400 1421.750 6827.500
## [1713] 4698.050  654.500 3268.050 4362.050 1386.900  415.400 2614.100 1513.600
## [1721] 3161.600   80.950 4676.700 6526.650  583.300 8078.100 3503.500 6669.450
## [1729] 4689.500 1201.150 1292.650   48.750 7108.200 1802.550 1505.150 1859.100
## [1737]  168.500  390.850 6339.450 1652.400   71.650   77.500 6392.850 3264.500
## [1745] 4599.150 1134.250 1621.350  947.300 2722.200 3058.300 1769.600 6293.750
## [1753] 1761.050  578.500  954.900  973.250   43.850 1490.400  280.000 1901.250
## [1761]  716.400 4720.000  930.950 1676.950 2642.050 6770.850 1835.300 1588.250
## [1769]   75.500  258.350 1502.250   19.200 6929.400 4453.300 3244.400  323.450
## [1777] 2661.100 2697.400 1424.500 1401.150 1739.600 5931.000 2333.850  949.850
## [1785]  572.450  696.800 1381.800 2572.950   47.950   45.100   45.000 2122.450
## [1793] 4931.800  116.950 6937.950 1261.700 3273.800 1415.850 3958.200 2492.250
## [1801]  279.200 1083.000  755.500  402.600 3252.000   68.750   46.200   45.150
## [1809]   43.300  936.850 2250.650 3857.100 1441.100 4338.600 1378.450   45.950
## [1817] 2566.300  171.000 1597.400 4744.350 6721.600  247.250   44.050 1734.650
## [1825]   45.550 4539.350  804.250 5011.150 3574.500 8086.400 4563.000 6362.350
## [1833]   67.100   70.050  165.450 1156.550 1834.150 3653.350 1477.650 1706.450
## [1841] 3953.700 1194.300 1327.850  419.700   21.000  207.350 1083.700 2007.850
## [1849] 5882.750 2657.550 1527.500  378.400 1612.200   76.650  260.700 6441.850
## [1857]  266.800 5124.600  962.250 1382.900  571.050 1399.350  150.000  167.200
## [1865] 7657.400  865.050 6153.850  174.200 1269.600 3862.550 6352.400 1348.500
## [1873]   50.900  471.550 5931.750 1404.650  726.100 1961.600 4194.850 4872.450
## [1881] 5118.950  658.950   81.050   76.950 5809.750  415.900  246.500  996.950
## [1889] 3145.150  265.300   20.900   21.050 4576.300  189.100  908.150   49.800
## [1897]  215.200 1500.950 5099.150 6385.950  159.450 6885.750 5940.850  668.850
## [1905] 1916.200   75.350   75.450 4613.950 7261.250 2459.800 2048.800  163.550
## [1913] 2888.700 2421.600 2292.750  553.400 3465.700 1210.400 1291.300 5356.450
## [1921] 5200.800 3237.050  576.650  433.750 1868.400 5728.550  825.700  390.400
## [1929]   93.550 2845.150 3894.400  886.400 1021.550 5885.400  268.400 2204.350
## [1937] 1259.000  309.100 6398.050 2257.750 6287.250 1662.050 1350.150 3600.650
## [1945] 1329.150  422.500   69.950 4627.650 6717.900   97.100 1710.450  637.400
## [1953]  117.950 2460.550 5464.650 2165.050 4941.800  223.150  181.100  341.450
## [1961] 5731.850  357.750 4616.100 4533.700  589.250  750.100  830.850  743.500
## [1969] 7040.850 3865.450 6825.650 1340.100  371.650 1184.000 8477.700 7382.850
## [1977]  456.850  331.600 6056.150  134.600  125.500 1390.600 2511.300 2737.050
## [1985]   74.300 2361.800 1730.350 6404.000  165.350 1867.600  128.600 7455.450
## [1993]   24.700  206.150 2030.300 5869.400 3377.800 1346.200 4946.050 4065.000
## [2001]  106.550 4964.700 4085.750 1742.750 6224.800 3415.250 6325.250  340.250
## [2009] 1683.600 3966.300  608.500 2896.600 1514.850 6792.450 4669.200   95.600
## [2017] 2934.300 6302.800  779.200  283.750 4600.700 5594.000  772.850   71.350
## [2025]  857.800 7554.050 5981.650 1702.900  467.150   69.750 2931.000 1400.850
## [2033]  137.850 1941.500 1932.750 1423.050  970.850 5810.900  223.900  391.700
## [2041]   79.950   19.300  811.650  174.750 3126.850 6841.450 3754.600 1406.650
## [2049]  834.700  627.400  242.000 3157.000 3092.000 2168.900  980.350   65.950
## [2057]  711.900 1952.800 4368.850 2647.100 8477.600   54.350 4528.000 1790.650
## [2065]  845.600 1210.300  854.450 2429.100  100.400 5229.450   44.450 1716.450
## [2073] 3023.550 4837.600 2032.300  436.900   70.550 5893.950 1430.050  313.000
## [2081] 3871.850  458.100 2745.700  341.350 1336.800 2181.750  147.750  818.450
## [2089] 7133.450  348.800 4674.400 1737.450 1498.850   50.100 1797.750  498.100
## [2097] 2624.250  184.100 5498.800 4845.400  369.100 6096.900  160.750 2684.350
## [2105] 3004.150 6994.800 5483.900 1233.650  527.900 4985.900 1258.350  111.400
## [2113]   43.950  308.100  383.650 2555.900 1284.200 7550.300 1110.050   99.600
## [2121] 6707.150 4164.400 5873.750  109.250  179.250 1338.150  862.400 8564.750
## [2129]  926.200 1718.200 5956.850   91.300 4824.450 1238.650   79.500  672.200
## [2137] 4264.600 1070.700 1345.850 1045.250 3003.550  467.550 7537.500 7482.100
## [2145] 3343.150 5427.050  587.100  100.800  161.150 7028.500 5232.900  225.850
## [2153]  274.700 1180.950 3370.200 7111.300 5958.850 5999.850 1648.450 5753.250
## [2161] 4492.900 3956.700 2625.550 1233.400 1309.000  813.450 1108.800 7349.350
## [2169]  294.200  929.200  740.000  754.500 3883.300 1414.200 3211.200  371.600
## [2177] 1246.400   95.850 2545.700 6448.850 1468.900 1013.600 6690.750 2088.750
## [2185] 7240.650  102.450  830.250 1588.700  829.300  302.450  712.250 1336.650
## [2193] 5360.750 6735.050   51.200 1010.000 4847.050 3019.700  161.650  217.550
## [2201] 2583.750  146.050  567.450 7711.250 1384.750 5481.250 8124.200  827.300
## [2209]   70.900  220.950 3673.600   49.850 2331.300   74.500 4495.650 6941.200
## [2217]  340.350 1789.900  908.550 1043.350 6822.150   71.550  157.550 5029.200
## [2225]  581.700 7318.200  420.450 7576.700  633.400  321.650 4965.000 6151.900
## [2233] 1253.900   45.200 5893.150 5420.650 2627.350 5037.550  743.750 6589.600
## [2241]   92.450 6733.150 3410.000  199.850  593.300 7288.400 5229.800 4464.800
## [2249] 5068.050  401.850 4451.850 6688.950   73.050 1211.650 7030.650 1020.200
## [2257] 5597.650 6223.300 1024.650 2933.200 1258.300   82.900 7789.600 2067.000
## [2265] 3452.550 5468.950 1802.150  733.550 3021.450 3687.850 1391.150  274.350
## [2273] 1214.050 5510.650 1322.850 1973.750 2196.300 7843.550 3211.900  130.150
## [2281]  692.350   85.500 6849.400  203.950 2117.200 6565.850  424.750 3306.850
## [2289]  168.900  253.800  197.400 3838.200 2065.150 5064.450 1140.050 2447.450
## [2297] 1263.900 1838.150 1185.000 1743.900   70.150   85.550 8529.500 6549.450
## [2305] 7806.500   25.700 6287.300 3251.850   50.600 7904.250 2654.050 2416.550
## [2313] 3520.750 5969.950  226.800 1082.750  565.750 4370.750   90.050 2169.400
## [2321]  550.600   55.450 6300.850  160.050  436.600 1781.350 3467.000 5552.500
## [2329] 2835.500 3591.250   88.350   63.750  617.150  870.250  601.250  111.650
## [2337] 6046.100 3923.800  777.300  512.450  141.450  892.150 1682.050 3398.900
## [2345] 4984.850 1445.300  305.550  507.900 3640.450 2673.450  389.800 2401.050
## [2353]  651.550  156.100 2796.350  407.050 6465.000  646.050 3777.150 4903.150
## [2361] 1653.850   47.500 1306.300  463.600  824.850 2094.650  438.900  847.300
## [2369]  329.750  674.550  162.550  546.950 7887.250 3186.650 1972.350 1527.350
## [2377]  490.550 1531.400  683.250 8058.850 2847.400 1133.900  294.450 1719.150
## [2385]  461.700 1160.450 5199.800 5163.300  162.300  883.350 1341.500  659.450
## [2393]   77.150   35.250 1205.050 4917.900  201.000  599.300 1733.150 5149.500
## [2401] 4677.100  119.300 4849.100 5424.250 5878.900  244.850  220.750 4261.200
## [2409] 5574.750 1501.750   89.750 4541.200  255.500 1072.000 2509.250 1440.750
## [2417] 1715.650 5333.350 3895.350  869.900  706.850  512.250 2636.050  814.750
## [2425]  388.600   93.450 1389.850 2894.550 4025.600 1354.400 1856.400  926.000
## [2433]  189.200  682.100 1778.700 1816.200 7069.250 1841.200   74.250 2656.700
## [2441] 1689.450 1054.750 2187.550 7334.050 1581.200   69.500 2404.850  171.450
## [2449] 2839.450 3132.750 3942.450  873.400 1529.650 6991.600   19.400  803.300
## [2457]  679.300 2791.500  715.000 1681.600 4016.200 3281.650 7317.100 6474.450
## [2465]  676.350 8164.100 1325.850 1654.850 7795.950 3952.450 2495.150 1230.250
## [2473]  876.750 4263.450 1992.950 1982.100  562.700   33.700 1090.100  227.450
## [2481] 1250.850   37.200  892.700  487.750 3713.950  141.700  678.200 8425.300
## [2489] 4154.800 7061.650 3364.550 2655.250 1425.450  332.500 5963.950 5742.900
## [2497]  278.850 1871.850 2866.450 4303.650 1753.000   54.750 3759.050  617.650
## [2505] 5935.100   94.600 2911.300  982.950 2974.500  198.700 1275.650 4003.000
## [2513] 3791.600  813.300  780.250  552.900  408.250  231.800 2191.150 5611.700
## [2521]  246.250 1296.150 7082.850 5662.250 1215.450 7854.150  525.000 5265.200
## [2529]   70.100 7129.450 7266.950 8496.700 2878.750  261.300 3205.600  279.250
## [2537] 6281.450 1131.300  738.200 1137.050   80.200 6341.450 6697.200  260.800
## [2545]  505.450 3655.450 1299.800 5564.850  188.100 1077.050 4922.400 2911.500
## [2553]  826.100   83.400  140.700 5377.800  665.450 3617.100 6643.500   84.800
## [2561] 1559.300 7987.600 1547.350 5426.850 1127.350 2142.800  287.850 4045.650
## [2569] 2757.850  600.000   19.800 4534.450   40.900 2094.900 1584.800 1302.650
## [2577] 2238.500   55.550 5437.750   90.750  365.650 2209.150 1912.150  255.550
## [2585] 5175.300  670.650 3177.250   90.350 6557.750 5791.850 3055.500 5196.100
## [2593] 8405.000 1789.250 5000.050 6713.200  562.600   91.450  828.850  617.350
## [2601]  266.900  625.050  301.400 6029.900 1842.700  206.600  604.700 7386.050
## [2609] 1471.750 2626.150  412.100 8277.050  583.450  369.250 1049.050 1414.800
## [2617]  169.750 4354.450 2719.200 6365.350   51.600 3190.250  812.500 1143.800
## [2625] 3297.000 1887.000  151.800  293.650 1308.100 2215.400  482.800 2598.950
## [2633]  216.450 5064.850  996.450  839.650 6733.000 2618.300 4084.350  765.500
## [2641]  793.550  613.950  402.850 1244.800   46.400  581.850  462.800 1540.200
## [2649]  169.800 5168.100 6780.100   94.500   55.300  208.000 3829.750 5294.600
## [2657] 6889.800 3254.350 6383.900  477.700 4447.550 7321.050 4135.000  697.700
## [2665]  168.650  174.300 2753.800  434.800 1077.500   95.650  107.250  851.200
## [2673]   20.950 5848.600  109.800  595.500  329.800 2513.500 5135.350 2000.200
## [2681]  931.750 7396.150 3958.850  260.900  297.300 1515.100  816.800 4868.400
## [2689]  688.000  288.350 3229.650 1178.250  185.400  966.250  758.600 1863.800
## [2697]  265.800 4107.300  396.300 2809.050 1567.550 1851.450 6028.950 2072.750
## [2705] 5551.150 4317.350  736.800  336.150 1522.650  622.900 4959.600  329.950
## [2713] 1048.850 1001.500  442.600 6703.500 3351.550  779.250  259.800 3483.450
## [2721] 4890.500  136.750  184.150 1315.000 6767.100  757.950 6890.000 1657.400
## [2729] 3008.550  262.050 8165.100  875.550 2649.150  220.650 1301.900   74.400
## [2737] 3326.200  790.000 1237.650  378.600  592.650  560.850 3638.250 1060.200
## [2745] 2921.750  854.900 4174.350 4920.550   20.500  810.300  772.400 1936.850
## [2753]   79.800 1070.500  347.650  999.900  113.100 2015.800 1454.250  246.700
## [2761] 6017.900 5817.450 5595.300 4765.000 1201.650  867.300 3007.250  252.750
## [2769] 6306.500 6841.050   81.950  451.100   44.600  226.200 7082.500 1017.350
## [2777]  527.350 2146.500  455.300 5969.850 1014.250 2362.100 1225.650 1873.700
## [2785]  386.500 6010.050 1850.650 7101.500 1043.400 1910.750  716.100 1686.150
## [2793] 6716.450 7839.850 6236.750   71.000 2919.850 3309.250   79.700 1254.700
## [2801] 2896.400  717.500 3888.650 6843.150  450.900  432.250 1767.350 1742.450
## [2809]  297.350 1820.450 1742.950 2444.250  949.800   73.500 2970.800 3334.950
## [2817] 2010.950 4684.300 2181.550 1303.250  371.400 2409.900 6155.400  829.100
## [2825] 2602.900 4667.000  824.750 5153.500 8182.850 6683.400 1564.050  755.600
## [2833] 3465.050 6292.700 1664.300  198.100 6045.900 4108.150 5980.750 5043.200
## [2841] 1029.750 2854.550 7114.250  907.050  973.950  605.750  661.550 4116.900
## [2849] 4494.650 4259.300 3282.750   55.700 1274.450  493.950 2239.650  480.750
## [2857]  635.600 5038.150  324.200 2793.550 2095.000  648.650   95.050  917.150
## [2865] 1346.900 4242.350  672.700 6561.250 7337.550  331.900 5194.050 4478.850
## [2873] 6283.300 2659.400  439.200 2107.150 3035.800 1866.450 1430.950 1071.600
## [2881] 6457.150  684.050 3914.050 3842.600  670.350 7880.250  298.450 3371.750
## [2889]  442.450 2345.550 1156.350 6143.150  144.800  414.950 1059.550  181.800
## [2897] 2212.550 2180.550   89.150  459.950 1036.750 2276.950  211.950   25.000
## [2905] 3162.650  210.650 3566.700 2080.100 4040.200 5186.000  196.150 1087.450
## [2913] 1672.150 1206.050 1113.950  107.050   38.150 6339.300 1688.900 1378.250
## [2921]  219.000 1067.150   79.550 3444.850  369.050 7553.600 1813.100 3321.350
## [2929]  707.500 7112.150 4641.100 7690.900 1380.100   78.650   45.400 3094.650
## [2937] 6518.350 2585.950   82.700   58.850  425.900 6342.700 2030.750 6700.050
## [2945] 7244.700 3678.300 3486.650  411.150  937.500 1559.150  970.400 2483.500
## [2953]  828.200 3810.550 1493.200   45.800  556.350 4911.050  187.350  307.600
## [2961] 4318.350 4820.550 3038.550 2136.900 7472.150  389.100 2296.250  187.450
## [2969]  261.250   38.450  299.200 3043.600 1506.400  323.250 1640.000  762.100
## [2977] 3846.350 5646.600   53.500   79.050   25.100 1516.600 2224.500  888.750
## [2985] 4310.350   42.900 2365.150  353.650 5073.100 4526.850  308.250  678.450
## [2993] 1237.300 1023.950 8182.750 4532.300 1444.050   19.100 7372.650 7325.100
## [3001] 3474.200  392.650 1058.600 3990.750 7475.850  835.500 2628.600 1718.350
## [3009] 1023.900 1193.550 1205.500 5776.450   78.900 1025.150  856.350  122.000
## [3017] 6602.900 1712.900 3635.150  702.900 3734.250 1144.500 4454.250   75.600
## [3025] 1117.550  180.250  930.050  110.150  333.600  465.050 1669.400 3545.100
## [3033]  504.050  440.200 1151.550 2475.350 1249.250  317.750  535.050  461.300
## [3041]  431.000  878.350  335.750 3121.400  324.800 1394.550 3413.250 3143.650
## [3049]  439.750  664.400 4759.550 1033.000 3482.850 2688.450  435.250 2448.750
## [3057]  307.000 2689.350 1329.200 1281.250 3527.000 4348.650  561.150   63.600
## [3065] 5129.300 4285.800   93.700 5894.500   25.050 1160.750 3091.750  365.550
## [3073]  272.950 3632.000  381.200 1035.500   52.000 2342.200  653.900   71.200
## [3081] 1498.200 4178.650 1821.800 5278.150 4024.200 6520.800 8308.900  109.200
## [3089]   92.050 3420.500   93.850 4068.000  337.900 3168.750 1412.400 3974.700
## [3097] 3439.000   42.450 5461.450  571.750 5498.200   96.850  111.050   94.400
## [3105]  521.100  923.850  141.100  628.650 5576.300 1046.100 1245.600 1287.850
## [3113] 1939.350  118.250  452.550 2696.550  875.350 1267.050  494.900  799.000
## [3121] 5763.300   20.100  106.900  710.050  568.200 1900.250  159.150 8012.750
## [3129]  856.650  551.300  184.950 4056.750 1096.650 3684.950 1752.450 7210.850
## [3137] 5264.500 2157.300   24.400  433.950 2435.150 5607.750 2874.150 4433.300
## [3145]  964.350 1974.800 1460.850  951.550 1821.200 1600.950  399.250 1218.550
## [3153]   81.700 2171.150 3634.800  292.400  317.250  218.550 5071.900 1423.350
## [3161] 3068.600 4690.650 6157.600 1442.650 3369.050 4671.650 3474.050 1875.550
## [3169]  272.350 3645.050  135.750 1319.850  229.400  370.250   69.100 5714.200
## [3177] 1233.250 3571.600   83.300 8035.950  579.400 3066.450 7634.250 3653.000
## [3185]  241.300 3870.300  387.900  527.500   78.450   20.300 3019.100 7051.950
## [3193] 1190.500 4448.800  255.250  146.900 1011.050 1714.950  762.500  535.350
## [3201]   75.550  338.900 2497.350 6273.400   70.250  908.750 4913.300   46.300
## [3209]  212.300 4443.450  316.200 1079.050  564.650 1095.650 6161.900  446.050
## [3217] 2106.050 2511.550  811.800 7323.150  186.050  454.000 7521.950 1056.950
## [3225]   44.150  834.150   85.450  999.800 2369.700 6297.650  239.550   59.200
## [3233] 1461.450  416.400 1060.600 4869.350   54.900 3265.950 2254.200  358.150
## [3241] 2939.800 4652.400 4408.450  580.800 2495.200  180.300 5913.950  158.400
## [3249]  104.200 1389.350 1629.200 6033.100   95.100 3320.750 1867.700  438.000
## [3257]  325.450 1148.100 3972.250  155.900 3673.150 1126.750   73.450 2413.050
## [3265] 6912.700 1581.950 5586.450 5846.650 6424.700 6018.650 3373.400 1537.900
## [3273] 1080.550  355.200   82.850 2016.450 5327.250 1263.050  151.300 7714.650
## [3281]  188.700 5549.400  130.500 2621.750 1875.250 5685.800  837.500  401.500
## [3289] 6118.950 6480.900 1800.050 7104.200 4214.250  863.100 1992.200   69.800
## [3297] 1948.350 4750.950 1007.900 5036.900 2391.800 6859.050 6521.900  617.850
## [3305]  157.750  516.300 2364.000 1687.950 7689.950 6239.050 2042.050 2807.100
## [3313] 4116.800 1317.950 4594.650 6332.750 3213.750 4976.150 7308.950 4555.200
## [3321]   44.950 6982.500 2274.350  789.550 4834.000 3131.800  602.550 3369.250
## [3329] 2674.150  199.750 1790.800  449.750   19.700 1400.300  411.600  741.000
## [3337] 5841.350 4512.700 5688.450   31.900 6674.650 1345.750 1843.050  196.950
## [3345] 1433.800  214.550  865.850 1358.600 3147.150 4535.850 1078.750  542.400
## [3353] 2312.550  415.050 3250.450   98.500   87.900  754.650 1952.250  153.800
## [3361] 3198.600 5610.150 4519.500 6860.600 1377.700  190.250 1651.950   78.300
## [3369] 7939.250   44.900  576.700 1279.000 1260.700  267.350 6586.850  934.150
## [3377]  123.650 7534.650 3645.600  314.450 3053.000  677.050 7965.950  906.850
## [3385] 4888.700  237.250  342.400  140.100 1108.000  295.550  892.650  198.250
## [3393] 4822.850 6741.150   79.150 1355.450 7209.000  438.400 7726.350 2070.750
## [3401] 1636.950 7581.500 3019.500 4729.750 6126.100 6333.400 6687.850 4158.250
## [3409] 3183.400   79.600 7149.350 1429.650  472.650 1734.500 1884.650 2568.150
## [3417]  470.000  278.400 2088.800  502.600 2595.850 5825.500   50.750 4449.750
## [3425] 1208.350 1956.400  310.600  290.550 2096.100 2665.000  543.800 3005.800
## [3433] 1623.150 2498.400 2586.000 3292.300  651.400 4674.550  232.350 2448.500
## [3441]  658.100 3128.800  223.450  919.400  653.950 1825.500  943.100  551.350
## [3449]  359.400  115.950  165.200 2338.350 3541.100 4146.050 1087.250 2522.400
## [3457]   81.000  717.300 1734.200 7069.300  742.900 3017.650 6423.000 1164.300
## [3465] 4220.350 1558.700 2743.450 4055.500 2710.250 6055.550  810.700 2538.200
## [3473] 6129.200 1750.850   36.550 6652.450 2575.450 6019.350 1379.600  296.150
## [3481]  653.250  412.600   49.550 1928.700   71.250 7845.800 1750.700  216.200
## [3489]  178.500  115.100 6029.000 2745.200 3721.900 3121.100  990.450 1004.350
## [3497]  157.650 3219.750  572.850 4554.850 1847.550 1766.750 1462.050 2193.200
## [3505] 2433.500  641.150 2398.400  861.850  583.000 7332.400  249.550 4475.900
## [3513]  416.450  788.600 6994.600 4116.150 2263.450 1374.350 4915.150  838.500
## [3521] 3715.650 4273.450 2044.750   30.550 1398.250  328.950 4680.050 3778.200
## [3529] 3161.400 2188.450  999.450 1888.650 3990.600   71.150 1240.250 2635.000
## [3537]  235.000 2347.850 7156.200 3089.600  270.800 2901.800 4949.100 2198.900
## [3545]  374.500  761.950 1520.900 5163.000 4059.850 2281.600 1356.700  231.450
## [3553]  242.400 4264.250 2774.550 3605.200 4069.900  874.200 1145.350 1323.700
## [3561] 5497.050  534.700 2455.050   38.700  947.400  357.000 1476.250   70.800
## [3569] 1448.600  291.900 5903.150 5921.350  146.650 1759.400 7774.050  140.950
## [3577]  249.950 1701.650 7732.650 4282.400  219.650 2018.100  669.000   68.950
## [3585]  224.850 3771.500  196.750  943.850 6572.850 3175.850   29.150  318.900
## [3593]   24.450 2762.750  631.850  232.500 5919.350  749.250  134.750   55.800
## [3601] 8240.850 4266.400 1115.600   95.000 4079.550 4187.750 2391.150  890.500
## [3609]  137.250 5154.600 3119.900  529.500  966.550 6936.850 3496.300  914.300
## [3617] 1929.000 5817.700 6110.200  178.800   28.300  435.000 2351.800  186.150
## [3625]  445.850  912.000  679.550 3581.600 4222.950 1994.300 5930.050 1505.850
## [3633] 5638.300  797.250 1359.450 2542.450   54.700  989.050   44.550   87.300
## [3641]  351.550 7297.750 6301.700  210.300 3822.450 1048.450 6393.650 1489.300
## [3649] 8061.500   74.200  518.750 5763.150  238.500 1031.700   34.800 1319.950
## [3657] 4388.400  420.200 2177.450 3950.850  827.050 3913.300  533.500 3756.450
## [3665]  443.900 2599.950  284.300 1740.800 3436.100 2462.550   70.850 3110.100
## [3673]  280.850  411.750  198.600  103.700 6144.550 4089.450  864.200 3249.400
## [3681] 5405.800 3363.800 7132.150 4138.900 5121.750  566.100 2715.300 1782.050
## [3689] 1742.500 2983.800   24.000  485.900 1905.700 1565.700 4858.700 3723.650
## [3697]  298.350  970.450  405.700 4534.900 2415.950 1157.050 8297.500   45.750
## [3705] 2083.100 4681.750  176.200 1001.200 1594.750  212.400 7677.400  815.500
## [3713]   80.150  259.650 8109.800 2386.850  419.350 7990.050 1402.250  749.350
## [3721] 8425.150 1171.500 5647.950  708.800 7567.200   29.900 4348.100  635.900
## [3729]  108.950   78.800 1682.400 6925.900 5127.950  874.800 6758.450 1874.300
## [3737]  791.150 4639.450  143.900 1776.550  536.400 6172.000 1559.450 6079.000
## [3745]   80.850 4029.950 2658.400  383.550   51.150 1745.500 2230.850 7281.600
## [3753] 1837.700  149.550  180.700  411.450 1328.350  576.950   68.450  123.050
## [3761]  468.350  174.700  172.350  139.350  539.850 4968.000  992.700 4718.250
## [3769] 5536.500 7806.600  434.100 1563.900 1332.400  545.200 6296.750 3645.500
## [3777]  161.450  226.950  646.850 1441.650 7511.300 5621.850 7919.800  593.200
## [3785] 1423.650 2763.350  692.100 2298.550 2640.550 2911.800 1727.500 6705.700
## [3793]  237.650 1672.350 2979.500  695.750 1654.600   24.250 1857.850  825.100
## [3801] 6424.250  837.950 4126.200  330.800 1337.450  362.200 5991.050 4891.500
## [3809] 5373.100 2068.550  487.050 4131.200 2301.150  131.650 4036.000 4900.650
## [3817] 5727.450  743.050 4804.650   24.050 1414.650 1443.650 2898.950 5309.500
## [3825]  451.550   50.550  117.050 5839.300 1893.500   45.350 1654.450  477.050
## [3833] 1415.550 4546.000  163.200  849.900  189.950  321.900 8058.550 7049.750
## [3841] 2560.100  286.800 7982.500 5683.600 3994.050  369.150 4631.700  401.950
## [3849] 1534.050 1093.000  701.300 1980.300 2893.400  262.300 3886.850 5917.550
## [3857]  914.000 2139.100 5948.700 3624.350 4753.850 5780.700 6869.700 1172.950
## [3865]  662.950 1765.950 2431.950  155.350 1859.200 3303.050  134.350 3409.100
## [3873]  709.500   70.500  953.450 3665.550 5515.800  272.000 6668.000 4052.400
## [3881]  718.550  937.600 5812.600 2546.850 6944.500 1346.300 1544.050  765.150
## [3889]  692.550 4059.350 6851.650   78.050 1187.050 5401.900  247.000  520.000
## [3897]  706.600 1370.350 2215.250   74.000  214.400 1871.150 6171.200 1013.200
## [3905]  336.700  333.650 6511.800  393.450 7009.500 2264.050 6921.700  600.250
## [3913]   56.350 4664.150 1441.800 5623.700  695.850 1028.750 4155.950  395.600
## [3921] 6330.400 2971.700  638.000 2034.250 2510.200 3419.500 2427.350 1760.250
## [3929] 3551.650  122.900 1424.200 2111.450 2909.950  374.000  300.800 5581.050
## [3937] 5676.650 3379.250  942.950  232.400 2088.450 6137.000 1434.600 3870.000
## [3945] 2043.450 2215.000  842.250 2576.200 1901.000 3515.250  605.450 3094.050
## [3953] 4929.550  595.050  469.800 8436.250  492.000 5496.900 1908.350  107.100
## [3961] 4575.350 4309.550 7922.750  522.350  587.700 3876.200 3778.850 1457.250
## [3969] 8349.450  185.600 1066.900  973.550 1226.450  342.300  985.050 3948.450
## [3977]  828.050   41.850 6164.700 2862.750  343.950   20.700 6590.500  717.950
## [3985] 2890.650 4885.850 1222.050 6871.700  405.600  208.250 1801.900 3062.450
## [3993] 1764.750 1816.750 1255.100 5743.050 3921.100  189.450   96.800  408.500
## [4001] 1846.650 8456.750 1011.500 4263.400 2549.100 3965.050 2496.700   90.600
## [4009]  288.050  368.100 7840.600 6632.750 1013.350  152.950 3772.650 1026.350
## [4017] 5031.850  220.400 1416.500  158.350  256.600 5542.550   68.500 8443.700
## [4025]  791.750 5708.200 2016.300  326.650 5471.750   19.950  346.400 1061.600
## [4033] 1971.500  773.650 1422.050 2460.350  856.500 1275.850 7467.500 7261.750
## [4041] 5116.600  660.050 6590.800 1208.150 1033.900 1885.150 2467.100  989.450
## [4049] 2006.950 5025.000 4830.250   59.750 3088.250 3134.700   94.550 8312.400
## [4057] 4863.850 6871.900 6529.250 6637.900 3165.600 1454.150 6786.100  543.000
## [4065] 1327.150   25.750  114.700  109.500 4692.950  546.850 1274.050 5301.100
## [4073]  280.350 2897.950 3371.000  801.300 6975.250  257.050 1079.450   40.100
## [4081] 6997.300 2217.150 1129.100  979.050 4119.400 2568.550 3349.100  492.100
## [4089] 1718.950  605.250 1344.500 4267.150 1121.050  918.700  521.800 4469.100
## [4097] 3580.300 1729.350 1073.300 4566.500  293.300 2603.100 1783.750 2440.150
## [4105] 6322.100   57.400 4284.650 7138.650 1539.750  123.800 2781.850 2731.000
## [4113]   89.100  497.300  711.150 1607.200 1490.950 1898.100 3273.950 2929.750
## [4121]  838.700 7746.700 6951.150 2669.450  235.200   92.650 3103.250  606.250
## [4129] 5330.200 1403.100 2727.800 5038.450   80.300 1462.600  150.600 5960.500
## [4137] 1192.300  314.550   56.000  877.350 2249.100 2807.650 1696.200 1032.050
## [4145] 4902.800 4995.350 5034.050 1857.750 1992.850  751.650   66.950  343.600
## [4153]  520.100 1387.450 7383.700 4483.950 1327.400 5974.300 4515.850  179.850
## [4161] 5040.200  165.000  422.700 3046.400  358.050 2936.250 1271.800  530.050
## [4169] 1808.700 1144.600 7446.900 7556.900 6595.000  149.050 4972.100 1880.850
## [4177] 2045.550 2187.150  477.550 2976.950 5025.850 3353.400 1461.150 2782.400
## [4185] 1699.150 1496.900  452.200 4428.450 1322.550 3563.800  139.750 1927.300
## [4193] 3000.250 3021.300 2245.400   24.750  944.650 1264.200 4917.750 2012.700
## [4201] 5743.300 1864.650 1221.650 1390.850  302.350 1374.900 1336.900 1297.800
## [4209] 6067.400 1222.250  487.950 2548.550  242.050 6218.450 7320.900 2967.350
## [4217] 6333.800  939.700 4200.250 5950.200 1037.750   93.400 1614.900 1573.950
## [4225] 3624.300  100.250 2607.600 1422.100   69.850 1523.400  324.300 3435.600
## [4233]  399.600 4549.450  322.500 3273.550 5375.150 2510.700 3090.050   61.050
## [4241]  955.600  140.400 1493.100   69.400 1626.050  541.150 1784.900   70.350
## [4249] 6075.900 5500.600   73.100 3229.400 3399.850 6431.050 1230.900  454.650
## [4257]  235.050 6595.900 5867.000  196.350  909.250 6449.150  762.450 5283.950
## [4265] 1617.500  785.750 1776.000 5396.250  574.500  400.300   84.300 2656.300
## [4273] 1445.950 5212.650 6440.250 2244.950 1130.000 6463.150 1131.200  585.950
## [4281] 6252.700 2062.150  720.450 2186.400 2979.300  956.650 3201.550 3973.200
## [4289]  447.900 1335.200  661.250 1111.850 7555.000   49.000 3046.150   69.350
## [4297]  836.350  272.200 5293.400 2570.000  798.200  916.900 6487.200 1855.650
## [4305] 1556.850 1988.050 5432.200  147.550 8424.900 2203.700  387.400  116.650
## [4313] 3045.750 2287.250  767.900  446.800 8100.250  830.700 4689.150 6754.350
## [4321] 3540.650 2184.600 1054.600  130.550 1540.350 6411.250 1432.550 7629.850
## [4329]  101.900  313.400 6312.900  629.550 1372.450 1212.250 6237.050 6310.900
## [4337] 5031.000   85.050 8672.450 2196.450 3008.150  220.800 5779.600  222.650
## [4345]  914.600  246.300 2110.150 5560.000 1633.000  547.650  969.850 2610.650
## [4353] 6567.900 4747.850 1759.550  101.100 6496.150 4234.150  300.700   59.550
## [4361] 4323.350 1466.100 8684.800 1776.450 2933.950 4370.250  144.350 4804.750
## [4369] 1125.200   39.850  422.400  251.750 8332.150  314.600 4331.400 6382.000
## [4377]  740.300  600.150 5538.800 7049.500  690.500  279.300 1427.550  452.700
## [4385] 1709.150   53.150  777.350  860.850 5012.100  166.300 2404.100 4820.150
## [4393]  209.900  610.750 3409.600   70.700  144.000 7875.000  911.600 1270.200
## [4401]  478.100 1561.500  761.850 2282.950 1615.100 1097.150  369.300 6725.300
## [4409]   31.550 6293.200  432.500  321.750 2434.450  532.100  375.250  125.950
## [4417] 1042.650 1620.250 2387.750  659.350 2660.200 1285.800 4211.550  377.550
## [4425]  990.900  193.800 6058.950  964.900  790.150 2467.750 2322.850 7262.000
## [4433] 4854.300 7748.750 1914.900 6470.100 2019.800 5688.050 1522.700 1334.500
## [4441]  252.000  700.450 5655.450 6747.350 5265.100 5174.350  105.600 2271.850
## [4449] 2966.950 1772.250   61.150  494.950 5290.450 3346.800 5219.650  217.500
## [4457]  607.700 5431.400 6004.850 5957.900 5442.050 4428.600 3067.200 6688.100
## [4465] 4224.700 4042.200   62.050 3580.950 1198.800 1755.350 3772.500 2877.950
## [4473]  357.700 1397.300  959.900 3182.950 3704.150 4620.400 8312.750  541.900
## [4481]  929.300  971.300 1285.050 1521.200 3389.250 1198.050 3414.650  754.000
## [4489]  216.900  373.000  245.200  481.100  302.750 1728.200 2964.050 2156.250
## [4497]   60.100 1051.900   78.950 5013.000 1738.900 2275.100 5511.650 1316.900
## [4505] 7993.300 1388.450  666.000   94.450  244.650 4134.700 2375.400 4862.500
## [4513] 2431.350  351.500  106.200 1413.000 1743.050  657.500 1050.500  426.350
## [4521] 4982.500 1451.900 7634.800 3116.150 2633.400   49.650 6979.800 4920.800
## [4529]   46.350 1021.800 5276.100 8289.200 2659.450   94.000 5824.750 1517.500
## [4537] 3479.050 7365.700 1331.050 1195.950 3946.900 4299.950 1424.950 4391.250
## [4545] 1993.800 2597.600 4213.900 5017.700 1052.350 4916.400 2959.800 7559.550
## [4553]   53.950 7133.100 1799.300  829.550 1312.150 1597.050  524.350 4191.450
## [4561]  711.950 2201.750  806.950 1620.450 6812.950 1837.900 7344.450  545.150
## [4569] 1500.250 2283.150  494.050 1376.500  755.400  825.400  488.650 2841.550
## [4577]  486.850 2075.100 5299.650  204.700 1356.300 5042.750  812.400 6605.550
## [4585] 2995.450  505.950 3509.400 6991.900  590.350 2789.700  137.950 1123.150
## [4593] 7953.250  349.800 1067.050 3527.300 3762.000 1248.900 3035.350 4300.800
## [4601] 6065.300  144.950 3233.600 5438.900 1081.450 2308.600 1882.800 3255.350
## [4609] 1067.650 2065.400 4136.400  221.900 3848.000 8022.850  173.150  781.250
## [4617] 4510.800 5317.800 4779.450  250.100 1745.200 4140.100 3670.500 1167.800
## [4625]  469.650   58.900  333.550 3171.150 1381.200  455.500 1158.850 6954.150
## [4633] 1672.100 3152.500 4307.100 2530.400 6141.650 3186.700 1054.800 5430.650
## [4641]  151.750  299.400 1086.750 2692.750 1389.600 3767.400 3641.500 2535.550
## [4649]   35.750 6880.850 3753.200  637.550  181.600 5329.550 1539.800 2209.750
## [4657]  223.750 7751.700 1174.350 4385.050 2606.350 1539.450   18.900 1261.350
## [4665]   58.150  225.600  253.900  400.000 2515.300  227.350  305.950  365.400
## [4673] 2357.750  198.500  554.250  742.950  251.650 4816.700  768.050 1215.800
## [4681] 3522.650 1834.950  305.100  910.450  155.650 3656.250  150.850  389.250
## [4689] 1261.000  108.700 7346.200 3708.400   44.100 1385.850  548.800  712.750
## [4697] 6405.000 1637.400 2536.550 6042.700  958.250 1730.650  459.600  201.950
## [4705]  285.200 6145.850 1529.450 4664.500 1740.700  552.950 7053.350  301.550
## [4713]  312.700 2960.100  834.200 6953.400 4134.850  899.800  541.500  116.850
## [4721] 7942.150 5321.250 4156.800  223.600  768.450 3765.050 2157.500  108.050
## [4729] 1391.650 1379.800 1273.300  810.450 1810.850 7782.850   70.300 1797.100
## [4737]  377.850  445.300  851.750 7624.200  355.100  575.450 1057.550 1388.750
## [4745] 1641.300 1375.150  152.700  185.200  195.050 1826.700  417.500  344.500
## [4753] 1660.000 2835.900 2730.850 5437.100 6981.350 5794.450  747.200 1267.950
## [4761] 3674.950 1275.600 5893.900  724.650 1536.750 3615.600  607.300 4154.550
## [4769] 2184.350 1852.850  847.800 2390.450 1923.500  338.100 3030.600 2184.850
## [4777] 1031.400  921.300 3875.400 3124.500 6689.000 1451.100 6368.200 3729.600
## [4785]  350.100 2847.200  452.350 1494.500  930.450 1272.050  475.100  673.100
## [4793]  208.700  150.750 3199.000 5844.650 2462.600 6263.800 3403.400  237.750
## [4801]  221.350 7881.200 2320.800  370.500 4062.200 3043.700 2723.400 1081.250
## [4809] 4097.050  632.200 4042.300  164.850 8166.800 4113.700 3047.150   70.400
## [4817] 4193.400 3729.750  399.450  331.300 1964.600 1336.150 1147.450  486.050
## [4825] 1078.900 5925.750 7804.150 4747.200 1028.900  226.450 4364.100 4692.550
## [4833] 2433.900 1217.250  154.300 6382.550 7623.200 1261.450   89.250 6779.050
## [4841] 4345.000 1714.550  893.200  810.850 6347.550 1123.650   43.150   35.100
## [4849] 1388.000 3851.450 1743.500 2638.100  946.950 1114.850 1777.600  684.850
## [4857] 1312.450  159.200  610.200  404.350   69.650 6363.450 4124.650  713.100
## [4865]  950.750  169.650  526.700  393.150 1147.000 3021.600 5718.200  191.350
## [4873] 4539.600 6397.600  280.400 2718.300 5711.050 3478.150   36.450 4133.950
## [4881] 2917.650   54.300 2964.800 2198.300 1189.900 1914.500 2001.500 5336.350
## [4889] 7238.600 7998.800 3825.850 5703.250 7397.000  164.600 6555.200  225.650
## [4897]  955.750 3382.300 2313.800  933.300  780.850 7852.400 3184.250  764.950
## [4905] 2763.000 1614.700  145.400  156.250 1604.500  270.150   20.600 7047.500
## [4913]  573.150 1538.600 4459.800 7459.000  306.050  639.700  348.150 4533.900
## [4921] 5563.650 1587.550   40.250  842.900 4228.550  784.450 1406.900 1857.300
## [4929] 7322.500 6725.500 3627.300 1761.450 1725.950 4192.150 1411.200  164.500
## [4937] 2724.600  264.550 4671.700 1173.550  318.500 7713.550 2471.250 7842.300
## [4945] 2227.800 4990.250 3744.050 7220.350 2351.450 2989.600 6077.750 4070.950
## [4953] 2479.050 2134.300 6000.100 2203.100  183.150 6194.100  638.950 2139.200
## [4961]  831.750  521.300 1337.500 7181.950  608.000  577.600 5953.000 1790.150
## [4969] 2531.400 4760.300  292.850  953.650  198.000 5705.050  609.900   79.650
## [4977] 6993.650 4122.650 5762.950 1537.850 2603.300 5566.400 5431.900 2258.250
## [4985] 1092.350 6401.250 2812.200   80.050 2698.350  616.900 1912.850  849.100
## [4993] 3460.300 1465.750   90.100 5555.300 1278.800 2907.350  146.300 4952.950
## [5001] 4504.900 4520.150 2316.850 8075.350 2302.350 7251.900 2078.550 6225.400
## [5009] 1242.250   99.450  599.250 3462.100  853.000  934.100 2375.200 2813.050
## [5017] 1222.800 5293.200 6314.350 1003.050 1593.100 2509.950   74.450 2345.200
## [5025] 3330.100 5522.700 2335.300 4798.400 8594.400  970.550 7665.800 3686.050
## [5033] 1115.150 2537.000 1393.600   89.350 4445.300  978.600 1258.150  331.350
## [5041]  291.400  453.750   84.750 1715.100 1715.150 1597.250 1250.100 3996.800
## [5049] 5215.100  235.500  673.200 1442.200 5639.050 5222.350 7291.750  799.650
## [5057]  424.500  249.400 4415.750 5270.600 2447.950 2884.900 3050.150  253.000
## [5065] 4517.250  436.200  118.400 3649.600 1200.150  255.600 2395.050 5083.550
## [5073]  389.600  644.500  523.500   39.300 2406.100  638.550  191.100 4524.050
## [5081] 4664.200 3470.800 6910.300 4014.200 1288.000 2277.650 6375.800 5251.750
## [5089] 1505.450 6903.100  913.300 5535.800  815.550 1411.650 5602.250 8244.300
## [5097]  741.500 4375.800 5968.400 3096.900 3901.250 2613.400  853.100 5661.700
## [5105]  794.250  695.050  160.800 5552.050 3275.150 4236.600   54.500  741.700
## [5113] 3019.250  962.900 4759.750 1498.350 1233.150 4882.800 5411.650  148.050
## [5121] 3930.550 6895.500   84.650 6856.950 2658.800 3766.200  129.550  347.250
## [5129]  354.050  929.450  679.000 3846.750 4480.700   44.350  499.400 1553.200
## [5137]  219.500 5311.850  586.050 2576.800 6435.250 1993.250 1923.850  939.800
## [5145] 3092.650 5986.550 5487.000  651.500   73.650 2405.050 4458.150 6856.450
## [5153] 4735.200  682.150 4525.800  321.050  335.650 1424.400 1748.550  474.900
## [5161]  668.400  926.250 1077.950 2541.250   46.000 1156.100 3694.450  382.800
## [5169]  746.750 3912.900  368.850 1654.700 1940.850  221.700 1794.650 5289.800
## [5177]  501.200 6140.850   48.450  309.250  201.100 6179.350 2838.700 4589.850
## [5185] 3735.450 2553.700 1342.150 1216.350 7578.050 2603.950   42.700 6056.900
## [5193] 2983.650  689.350 2025.100 1747.200 4657.950  296.100 8016.600   81.100
## [5201]  433.500 6428.400 5883.850 1043.800 6252.900 1857.250  146.400  240.450
## [5209] 1724.150  315.300  429.550  356.150  488.250 1298.700 1378.750  973.450
## [5217]  384.250 8543.250  389.950 4275.750 1924.100  669.850 5784.300 5166.200
## [5225] 4060.550  267.400 3532.850 4914.800 5315.800  775.600 5445.950   53.550
## [5233] 1007.800  833.550 6579.050 1004.500 7856.000 2169.750  896.900  501.350
## [5241] 4126.350 2460.150  477.600  370.650  265.750 2424.450 1849.950 1698.550
## [5249] 1910.600  998.100  890.600 1383.600   48.600 1207.000  563.500  864.550
## [5257] 2109.350  701.050 2265.250  220.600 5749.800 2796.450 5165.700 5696.600
## [5265] 2076.050   44.200  215.250 1859.500 7470.100  229.500 2470.100 2092.900
## [5273] 5629.550  469.850  733.950  485.250 1244.500 3994.450   78.250 1131.500
## [5281]  184.050 1178.750  667.700 5629.150  109.300  958.450  403.150   75.900
## [5289]   76.200 4392.500 3168.000 1096.600 2343.850 3588.400 7511.900 1725.000
## [5297]   49.750 1691.900 2248.050 4479.200 3471.100   63.000 3314.150  865.550
## [5305]  852.700 1930.900   91.400 3949.150 4304.000  409.900 1554.900 3472.050
## [5313]  117.800 3210.350  207.400   60.000  649.650   20.850 2106.300   35.000
## [5321] 2011.400 6205.500  903.700 3882.300  879.800 4390.250   68.200  452.800
## [5329] 5329.000 1758.900 5737.600 1152.700 7674.550 2157.950 1219.850 2414.550
## [5337] 1155.600 7548.100 1809.350 1564.400   75.700   84.400  864.850  228.750
## [5345] 7752.050 1951.000  470.600 4060.900  384.500 3432.900  108.650 3952.650
## [5353]  463.050 3416.850 1498.650 2867.750 4807.350  471.350 1041.800 7689.800
## [5361] 1132.350 1815.000 1311.300  199.450 1637.300 1326.350 6376.550  935.900
## [5369] 1611.150 6989.700 2779.500 1931.750 8331.950  735.900 2283.300 1445.200
## [5377]  818.050 2333.050 1992.550 5890.000  916.750 1029.800 1796.550  454.050
## [5385] 1392.250 1049.600  734.600 1540.050 1978.650 3181.800  229.700 5625.550
## [5393] 6581.900 1347.150 3808.200 3974.150 7661.800 2479.250  266.600 5601.400
## [5401] 1982.600  339.900 4828.050 5980.550 4808.700 3692.850 1068.150 2383.600
## [5409] 1438.050  917.450 6096.450 3078.100   99.950  475.200 2036.550 6444.050
## [5417] 1426.750  767.550 7932.500 4040.650 2768.650  474.800  446.100 1345.650
## [5425] 2425.400 2077.950  416.300 1663.500 1286.050   35.850 1094.350 7719.500
## [5433]  514.600 1451.600 4932.500 5443.650  330.250  746.500  122.700 6631.850
## [5441] 8250.000 3561.150 1763.550 2419.000 5234.950 3097.000 1709.100 1848.800
## [5449]  723.300  809.750 1470.950  577.150 6914.950  602.900  124.400 3827.900
## [5457]  533.050 2961.400 3264.450  995.350 2815.250  154.800  257.600 5757.200
## [5465] 7517.700 1234.800 1389.200 3836.300 1474.750 6001.450  720.100 2832.750
## [5473]  472.250 1460.650 1336.350 6388.650  153.050  677.900 1165.600 2119.500
## [5481]  921.550   72.000   68.350  847.250 4295.350  135.000 1400.550 1380.400
## [5489] 4386.200   86.000 5785.500   52.050 2018.400   79.450 2727.300  263.650
## [5497]  275.400 2816.650  538.500  948.900  846.800 4783.500 2997.450 5897.400
## [5505]  524.500  269.650 4740.000 2341.500 1789.650 1626.400  800.300 5060.850
## [5513] 1448.800 4254.850  466.600 4627.800 6838.600 1101.850   44.300 4297.600
## [5521]  414.100 3969.350 2274.100 1296.800 1268.850 8192.600   59.250 1147.850
## [5529] 4361.550 2006.100 2078.950 7609.750 1218.450 1416.200  483.300 1234.600
## [5537] 1311.600 5618.300 6185.150 1237.850 2381.550  788.350  756.400  613.400
## [5545] 3625.200  550.350 4793.800 1267.200  442.200   84.850 5567.450 3160.550
## [5553] 5706.200 3085.350 3541.400   50.700 1165.550 4855.350 2806.900 1422.650
## [5561]  608.150  641.350 4959.150 1321.300 1663.750 3024.150 2188.500 4138.050
## [5569]  102.500  872.650 2724.250  413.250 1374.200  757.100 6692.650  218.500
## [5577]  608.800 1004.750 1125.600 3847.600  978.000 1387.350  746.050  304.600
## [5585] 1098.850 4368.950  827.700  279.550 3512.500 1483.250 4653.850 4400.750
## [5593] 8033.100 1253.650  552.650 1036.000 4025.500  928.400   24.900  460.250
## [5601] 6506.150 5598.300 4374.550  678.750 2191.700  239.750 5485.500  609.050
## [5609]  683.750  404.200 5189.750 5060.900  233.650 7176.550  291.450  689.750
## [5617] 3263.900 1993.200  254.500  967.900  242.950 1841.900  232.100  809.250
## [5625]  866.450  360.550 2076.200  355.900 7299.650 2291.200  129.150 7491.750
## [5633] 5835.500 7031.450 7723.900 1032.000   70.750  109.600  727.800  130.750
## [5641]  893.000  763.100  781.400  902.250 2653.650 1016.700 5943.650 3126.450
## [5649] 1070.150 3457.900  340.400 4299.200 1093.200  521.900 1630.400  713.600
## [5657] 1265.650 4003.850 1401.400 1510.500  178.100  480.600 4541.900 7542.250
## [5665]  251.250 1595.500   23.450  685.550 3874.100 6891.400 4916.950 1373.000
## [5673]   29.700 6039.900 1548.650 3440.250 4226.700 1023.750   55.400 7074.400
## [5681]  156.350 6849.750 3263.600 1252.850   67.550   70.200 5750.000 1549.750
## [5689] 1810.550 2952.850 7467.550 5484.400  294.900   97.500 5916.450  113.350
## [5697]  476.800  101.650 1130.850 3532.250 6891.450 1570.700  520.950 7854.900
## [5705] 3581.400 1447.900 8547.150  727.850  357.600  159.350 6069.250 3274.350
## [5713] 1359.000 1777.900 6109.650 1122.400 2020.900 3795.450 4504.550 3579.150
## [5721]   49.700  276.500 8175.900  890.350 5588.800   58.000 5568.350 2203.650
## [5729]  938.950 2024.100 3623.950 2369.050 3877.950 4577.900   25.850 2871.500
## [5737]  672.550 1573.700 1270.550 7711.450  126.050 2193.650   64.550   31.200
## [5745]   38.250 3348.100  533.600 2907.550 1620.800 3480.350  293.850 3243.450
## [5753] 4137.200   79.250 5348.650  659.650 3180.500  118.500 3023.850 3365.850
## [5761]  195.300 1031.100  997.650 6471.850 6241.350 6501.350 2237.550 5231.300
## [5769] 5275.800  165.500  358.500 6614.900   80.500 2421.750 1294.600 1299.100
## [5777] 5733.400 7430.750  900.500  630.600 3856.750 1222.650  374.800 1625.000
## [5785] 7234.800  331.850 3959.350 5088.400 3969.400 4860.850  788.050 1266.350
## [5793]  470.950  688.200  387.700  845.250  560.600 4230.250 4983.050 4113.150
## [5801]  521.000  471.850 5976.900  506.900 4299.750 7548.600 1654.750   80.350
## [5809] 4551.500 6227.500   76.400  514.000   57.500 1474.350  880.200 3270.250
## [5817] 3919.150 7285.700   93.300  169.050 7658.300 5959.300 5295.700 4693.200
## [5825] 3512.900 5231.200 3603.450  217.450 6875.350 2021.350 2564.950 5611.750
## [5833] 7610.100   35.050   73.000 4543.950  450.400 1297.350 4442.750 1423.150
## [5841] 4378.350 2716.300  450.650 1175.850  558.800 2220.100 3283.050  142.350
## [5849] 4939.250 4237.500  335.950   33.200 7188.500 1119.350  116.600   68.800
## [5857]  287.400 2341.550 1362.850  163.600 7752.300 6585.350 4786.100 3835.550
## [5865]  397.000 1027.250 1580.100 7222.750 3769.700 4233.950 1680.250 3725.500
## [5873]  413.650 7707.700  714.150 8309.550  601.550  139.250 1888.250 2773.900
## [5881] 5409.750 5643.400  197.700  401.300 3238.400 1573.050  235.800 1364.750
## [5889] 1985.150  655.850  303.150 4335.200  647.500 1574.450 2748.700 2483.650
## [5897] 6367.200 4904.200 2044.950 1794.800 7173.150 6441.400 7039.050  921.400
## [5905] 4018.350 5448.600 2085.450 1358.850 5135.150  730.100 2869.850   49.250
## [5913] 1108.600 1815.650  730.400 5071.050 4014.600  568.850 5860.700 7279.350
## [5921] 1064.950 5769.600 5886.850 4238.450  418.300  136.050  708.200  788.550
## [5929]  700.850 4378.800 3442.800  181.700 7171.700 4016.850 4122.900 1482.300
## [5937] 1240.800   44.650 1095.300  788.800 6578.550 2802.300  857.750  184.400
## [5945]  364.550 6093.300 1861.100 1079.650 7475.100 2862.550 3069.450 2349.800
## [5953]  469.250 4213.350 3301.050 3529.950 7723.700 4144.900 4265.000  154.650
## [5961] 3246.450 8337.450 5731.400 6176.600 1905.400  931.900 7348.800  776.250
## [5969] 5243.050  141.650 7679.650 2954.500 1006.900 2540.100 3097.200 3807.350
## [5977] 2484.000 5785.650 2619.150 1524.850 2790.650 1784.500 3937.450 2276.100
## [5985] 2029.050  802.350  418.400 4653.250  275.900 2130.450 1191.400   50.500
## [5993] 2554.000 5589.450  467.700 3334.900  920.500 3431.750  150.350 2587.700
## [6001]  367.950 5125.750 4801.100 6219.600  550.100 7862.250 1242.200 4871.050
## [6009] 3190.650 2666.750  792.150  295.650 1459.350 4398.150 4297.950  167.300
## [6017] 4096.900 3454.600 1286.000 1387.000  786.300  641.250  705.450  345.500
## [6025]  345.900 5811.800  124.450 1375.600 3491.550 7920.700 6640.700  718.100
## [6033]  320.400  101.450 1334.450 3358.650 4764.000  350.300 5703.000  525.550
## [6041]   69.200  483.150  934.800  786.500 4086.300 5364.800   82.300  770.400
## [6049] 6816.950 2419.550 4138.700  267.600 3457.450 1115.200 5435.600 4186.300
## [6057] 4630.200 3221.250  688.500  867.100 4746.050  712.850   48.950 5764.700
## [6065]  428.450 1505.350  693.450  930.400 1177.950 5069.650  324.250 1458.100
## [6073]  156.400 2298.900 1679.650  369.600 2998.000 5206.550 3626.100 7968.850
## [6081]  152.450 1959.500 2053.050  398.550 3425.350 4323.450  703.550 1275.700
## [6089] 2965.750 1647.000   56.250 2249.950 6109.750  159.400 3751.150   68.650
## [6097]  411.250  105.500 3320.600  327.450 5669.500  465.450  704.300 1369.800
## [6105] 1107.250   95.550 6375.200 8152.300 1566.750  130.250  162.150  110.050
## [6113] 6302.850 2264.500 1253.500   41.200 5265.550  693.300 5997.100 3824.200
## [6121] 3886.050 7283.250  412.550 1070.250  817.950 1171.300 6548.650  625.650
## [6129] 1911.500  134.700 1507.000 2978.300  299.300 5832.650 5567.550  450.800
## [6137] 4166.350 1215.600 7898.450 3915.400  979.500 7432.050 4026.400   25.300
## [6145] 1193.050 1958.450   63.150 1301.100  484.050 3887.850 2208.750  238.150
## [6153]   80.800  958.150  118.300   76.450 3845.450 1094.500  573.750 1267.000
## [6161]  633.450 6129.650 1218.250 1405.300 2274.900 1068.850  533.900  676.150
## [6169] 3804.400 1118.800 5236.400 1386.800  762.250 1902.000  239.050 5673.700
## [6177]   39.800  997.750 5574.350  406.050  138.850 1801.100  689.000  790.700
## [6185]  582.500 1618.200 1173.350  900.900 2122.050 6719.900   69.150 3784.000
## [6193] 1798.650   54.650 3886.450 1224.050 2310.200  723.400 3988.500 3554.600
## [6201] 6034.850  531.600  173.000 2511.950 3893.600  357.150  467.500 2288.700
## [6209] 4627.850  289.100 6460.550 1931.300 2221.550 7758.900  172.850  224.500
## [6217] 7388.450 3460.950 1700.900 3090.650 1293.800  645.800 5224.950  500.100
## [6225] 2427.100 3488.150 1035.700 7565.350 2799.000 1601.500 6256.200 1232.900
## [6233] 1937.400 1096.250 5059.750 3023.650 4889.200 2289.900 6503.200 1313.250
## [6241]  990.300  228.000 5746.150  209.100 1864.200 5979.700 3902.450 7142.500
## [6249]  902.000 4481.000  805.200  154.850  528.450 8349.700 4953.250  332.650
## [6257] 2259.350 1411.350  593.750 6328.700 1411.900 6841.400 3233.850 1062.100
## [6265] 4016.300  226.550 7110.750 5440.900  235.100 1958.950 5528.900 1463.700
## [6273] 1025.050  552.100 3815.400 3313.400 1938.900 3014.650 4839.150 2010.550
## [6281] 5139.650 1673.400  309.350 3171.600 8670.100  916.000  299.750  702.050
## [6289] 2354.800 3473.400 4438.200 4819.750   92.250 1567.000 1242.450  559.200
## [6297]  220.100  531.150 1183.200  465.850 6876.050  501.000 3782.400  460.200
## [6305] 1790.350  733.350 1334.000 7767.250  876.150 4600.950  113.550 1793.250
## [6313]  886.700 7737.550 1348.900 1686.850 1879.250 4013.800 7195.350  780.100
## [6321]  107.600 3801.700  308.700  438.250   50.350 3778.100 3147.500 5438.950
## [6329] 5102.350 1872.200  213.350 5617.750 5386.500 1776.950 2483.050  235.650
## [6337] 5224.350 2272.800 4663.400  201.700  125.000  684.400  620.350 1146.050
## [6345] 1806.350  603.000 5798.300  519.150  497.600 1301.700 1129.750  266.950
## [6353]  257.000  865.800 2623.650 1082.800  147.800 4378.900 3616.250 2924.050
## [6361] 6014.850   32.700 2882.250 1509.900 5305.050 2368.400 7985.900 3545.350
## [6369] 1301.000 2985.250   77.750   95.450 1311.750 1135.700 2319.800 3720.350
## [6377] 5025.800 5224.500 6185.800 1498.550 1208.600 6613.650   69.700  573.300
## [6385] 1818.900 1787.350 1051.050 7181.250 3688.600  871.400  780.500  821.600
## [6393]  239.450  244.450 3357.900  129.600 4977.200  365.350  334.650 2424.050
## [6401] 4981.150 2090.250 4905.750 2038.700 4014.000 2441.700 2751.000 1307.800
## [6409] 2868.050 7882.500 1087.700  791.700 7493.050 4414.300 6841.300  819.950
## [6417] 6052.250 3361.050 4869.500  509.300 4308.250  221.100 3833.950  294.950
## [6425] 4092.850  471.700  216.750 5720.950  503.250 7365.300 7245.900  385.000
## [6433]  961.400 4615.900 3251.300 3880.050 3088.750 1396.000   30.500   53.050
## [6441] 6859.500 2108.350 6770.500 4730.600 1151.050  232.550 1022.600 5121.300
## [6449] 1127.200  309.400  523.100 4250.100  770.500 3342.000 3930.600 1747.850
## [6457] 2754.450  897.750 2780.600 5895.450 2208.050 2196.150 1692.600  265.350
## [6465] 1836.250 6418.900 4871.450 4947.550 1558.650 4284.200 5617.950   24.200
## [6473]  679.850  554.450 5237.400  789.200 1525.350 2804.450 3726.150 1652.100
## [6481] 1588.750 3366.050  778.100 7113.750 4367.350  993.150 5012.350 2728.600
## [6489] 2093.400 1011.800
## 
## $Status
## [1] "Current" "Left"
# Step 3: Transformations
# Convert categorical variables to factors
categorical_vars <- c("Status", "Gender", "Partner", "Dependents", "PhoneService",
                      "MultipleLines", "InternetService", "OnlineSecurity",
                      "OnlineBackup", "DeviceProtection", "TechSupport",
                      "StreamingTV", "StreamingMovies", "Contract",
                      "PaperlessBilling", "PaymentMethod")
data[categorical_vars] <- lapply(data[categorical_vars], as.factor)
 
# Normalize numerical columns: Tenure, MonthlyCharges, TotalCharges
numerical_vars <- c("Tenure", "MonthlyCharges", "TotalCharges")
data[numerical_vars] <- scale(data[numerical_vars])
# Step 4: Remove Redundant Data
# Check for duplicates
sum(duplicated(data))
## [1] 22
# Remove duplicates if any
data <- data[!duplicated(data), ]
# Step 5: Validate Data Integrity
# Check if TotalCharges aligns with Tenure and MonthlyCharges
data <- data %>%
  mutate(ComputedTotal = Tenure * MonthlyCharges) %>%
  mutate(IntegrityCheck = abs(ComputedTotal - TotalCharges) < 0.01)
 
# Any inconsistencies?
table(data$IntegrityCheck)
## 
## FALSE  TRUE 
##  6918    59
# Drop the computed column
data <- select(data, -ComputedTotal, -IntegrityCheck)
 
# Save cleaned data
write.csv(data, "C:/Users/Mahika/OneDrive - University of Cincinnati/BANA 4080/data/cleaned_customer_retention.csv", row.names = FALSE)
 
# Display summary of cleaned data
summary(data)
##     Gender     SeniorCitizen    Partner    Dependents     Tenure         
##  Female:3459   Min.   :0.0000   No :3591   No :4872   Min.   :-1.318502  
##  Male  :3518   1st Qu.:0.0000   Yes:3386   Yes:2105   1st Qu.:-0.951971  
##                Median :0.0000                         Median :-0.137457  
##                Mean   :0.1622                         Mean   : 0.004029  
##                3rd Qu.:0.0000                         3rd Qu.: 0.921410  
##                Max.   :1.0000                         Max.   : 1.613747  
##  PhoneService          MultipleLines     InternetService
##  No : 676     No              :3349   DSL        :2403  
##  Yes:6301     No phone service: 676   Fiber optic:3069  
##               Yes             :2952   No         :1505  
##                                                         
##                                                         
##                                                         
##              OnlineSecurity              OnlineBackup 
##  No                 :3463   No                 :3062  
##  No internet service:1505   No internet service:1505  
##  Yes                :2009   Yes                :2410  
##                                                       
##                                                       
##                                                       
##             DeviceProtection              TechSupport  
##  No                 :3066    No                 :3440  
##  No internet service:1505    No internet service:1505  
##  Yes                :2406    Yes                :2032  
##                                                        
##                                                        
##                                                        
##               StreamingTV              StreamingMovies           Contract   
##  No                 :2784   No                 :2754   Month-to-month:3825  
##  No internet service:1505   No internet service:1505   One year      :1465  
##  Yes                :2688   Yes                :2718   Two year      :1687  
##                                                                             
##                                                                             
##                                                                             
##  PaperlessBilling                   PaymentMethod  MonthlyCharges     
##  No :2850         Bank transfer (automatic):1534   Min.   :-1.544864  
##  Yes:4127         Credit card (automatic)  :1512   1st Qu.:-0.966817  
##                   Electronic check         :2344   Median : 0.187616  
##                   Mailed check             :1587   Mean   : 0.003014  
##                                                    3rd Qu.: 0.835428  
##                                                    Max.   : 1.793856  
##   TotalCharges           Status    
##  Min.   :-0.999205   Current:5133  
##  1st Qu.:-0.825761   Left   :1844  
##  Median :-0.389082                 
##  Mean   : 0.003127                 
##  3rd Qu.: 0.672358                 
##  Max.   : 2.827340
# Check the distribution of churn ('Status')
churn_distribution <- data %>%
  count(Status) %>%
  mutate(Percent = n / sum(n) * 100)

print(churn_distribution)
## # A tibble: 2 × 3
##   Status      n Percent
##   <fct>   <int>   <dbl>
## 1 Current  5133    73.6
## 2 Left     1844    26.4
ggplot(churn_distribution, aes(x = Status, y = Percent, fill = Status)) +
  geom_bar(stat = "identity", position = position_dodge(), width = 0.7) +
  scale_fill_manual(values = c("blue", "red")) +
  labs(
    title = "Churn Distribution",
    y = "Percentage of Customers",
    x = "Customer Status"
  ) +
  theme_minimal(base_size = 14) +
  theme(
    plot.title = element_text(hjust = 0.5, face = "bold"),
    axis.title.x = element_text(face = "bold"),
    axis.title.y = element_text(face = "bold")
  )

# Categorical Predictors vs. Churn
plot_list <- list()
for (var in categorical_vars) {
  p <- ggplot(data, aes_string(x = var, fill = "Status")) +
    geom_bar(position = "fill") +
    labs(title = paste("Churn by", var), y = "Proportion", x = var) +
    theme_minimal() +
    theme(axis.text.x = element_text(angle = 45, hjust = 1))
  
  plot_list[[var]] <- p
}
## Warning: `aes_string()` was deprecated in ggplot2 3.0.0.
## ℹ Please use tidy evaluation idioms with `aes()`.
## ℹ See also `vignette("ggplot2-in-packages")` for more information.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.
# Print all plots
for (p in plot_list) {
  print(p)
}

# Numerical Predictors vs. Churn
numerical_vars <- c("Tenure", "MonthlyCharges", "TotalCharges")
boxplot_list <- list()
for (var in numerical_vars) {
  p <- ggplot(data, aes_string(x = "Status", y = var, fill = "Status")) +
    geom_boxplot() +
    labs(title = paste("Churn by", var), y = var, x = "Status") +
    theme_minimal()
  
  boxplot_list[[var]] <- p
}

# Print all boxplots
for (p in boxplot_list) {
  print(p)
}

# Correlation Analysis for Numerical Predictors
cor_matrix <- data %>%
  select(all_of(numerical_vars)) %>%
  cor(use = "complete.obs")

# Correlation heatmap
corrplot(cor_matrix, method = "color", type = "upper",
         addCoef.col = "black", title = "Correlation Heatmap",
         mar = c(0, 0, 1, 0))

# Interaction Analysis: Example - Contract Type and Monthly Charges
ggplot(data, aes(x = Contract, y = MonthlyCharges, fill = Status)) +
  geom_boxplot() +
  labs(title = "Interaction: Contract Type and Monthly Charges", y = "Monthly Charges", x = "Contract") +
  theme_minimal()

# Load required libraries
library(caret)
## Warning: package 'caret' was built under R version 4.4.2
## Loading required package: lattice
library(ROCR)
## Warning: package 'ROCR' was built under R version 4.4.2
library(randomForest)
## Warning: package 'randomForest' was built under R version 4.4.2
## randomForest 4.7-1.2
## Type rfNews() to see new features/changes/bug fixes.
## 
## Attaching package: 'randomForest'
## The following object is masked from 'package:ggplot2':
## 
##     margin
## The following object is masked from 'package:dplyr':
## 
##     combine
library(rpart)
## Warning: package 'rpart' was built under R version 4.4.2
library(e1071)
## Warning: package 'e1071' was built under R version 4.4.2
# Convert Status to a binary factor: 'Left' and 'Current'
data$Status <- factor(ifelse(data$Status == "Left", "Left", "Current"), levels = c("Current", "Left"))

# Split the data
set.seed(123)  # For reproducibility
trainIndex <- createDataPartition(data$Status, p = 0.7, list = FALSE)
train_data <- data[trainIndex, ]
test_data <- data[-trainIndex, ]

# Define control for cross-validation
control <- trainControl(method = "cv", 
                        number = 5, 
                        classProbs = TRUE, 
                        summaryFunction = twoClassSummary,
                        savePredictions = "final")

# Logistic Regression
set.seed(123)
log_model <- train(Status ~ ., data = train_data, method = "glm",
                   family = "binomial", trControl = control,
                   metric = "ROC")

# Decision Tree
set.seed(123)
tree_model <- train(Status ~ ., data = train_data, method = "rpart",
                    trControl = control, metric = "ROC")

# Random Forest
set.seed(123)
rf_model <- train(Status ~ ., data = train_data, method = "rf",
                  trControl = control, metric = "ROC")

# Compare AUC across models
results <- resamples(list(Logistic = log_model, Tree = tree_model, RF = rf_model))
summary(results)
## 
## Call:
## summary.resamples(object = results)
## 
## Models: Logistic, Tree, RF 
## Number of resamples: 5 
## 
## ROC 
##               Min.   1st Qu.    Median      Mean   3rd Qu.      Max. NA's
## Logistic 0.8222202 0.8439882 0.8473203 0.8444064 0.8487228 0.8597805    0
## Tree     0.6877284 0.7116695 0.7125611 0.7419441 0.7879697 0.8097918    0
## RF       0.8045412 0.8273261 0.8289175 0.8319312 0.8472523 0.8516189    0
## 
## Sens 
##               Min.   1st Qu.    Median      Mean   3rd Qu.      Max. NA's
## Logistic 0.8887344 0.8901252 0.8941504 0.8928774 0.8942976 0.8970793    0
## Tree     0.8997214 0.9026426 0.9082058 0.9154102 0.9207232 0.9457580    0
## RF       0.9346314 0.9374131 0.9568245 0.9513093 0.9624478 0.9652295    0
## 
## Spec 
##               Min.   1st Qu.    Median      Mean   3rd Qu.      Max. NA's
## Logistic 0.5193798 0.5232558 0.5521236 0.5453084 0.5620155 0.5697674    0
## Tree     0.3953488 0.4263566 0.4612403 0.4476849 0.4689922 0.4864865    0
## RF       0.3062016 0.3294574 0.3294574 0.3338242 0.3372093 0.3667954    0
dotplot(results)

# Evaluate the best model on test data
best_model <- rf_model  # Assuming Random Forest performs best
predictions <- predict(best_model, newdata = test_data, type = "prob")
pred_class <- ifelse(predictions[, 2] > 0.5, "Left", "Current")

# Confusion matrix
confusionMatrix(factor(pred_class), factor(test_data$Status))
## Confusion Matrix and Statistics
## 
##           Reference
## Prediction Current Left
##    Current    1450  343
##    Left         89  210
##                                           
##                Accuracy : 0.7935          
##                  95% CI : (0.7755, 0.8107)
##     No Information Rate : 0.7357          
##     P-Value [Acc > NIR] : 4.456e-10       
##                                           
##                   Kappa : 0.3775          
##                                           
##  Mcnemar's Test P-Value : < 2.2e-16       
##                                           
##             Sensitivity : 0.9422          
##             Specificity : 0.3797          
##          Pos Pred Value : 0.8087          
##          Neg Pred Value : 0.7023          
##              Prevalence : 0.7357          
##          Detection Rate : 0.6931          
##    Detection Prevalence : 0.8571          
##       Balanced Accuracy : 0.6610          
##                                           
##        'Positive' Class : Current         
## 
# AUC for test data
roc <- prediction(predictions[, 2], ifelse(test_data$Status == "Left", 1, 0))
auc <- performance(roc, "auc")@y.values[[1]]
print(paste("AUC on Test Data:", auc))
## [1] "AUC on Test Data: 0.836947032372305"
# Feature importance
varImpPlot(best_model$finalModel)

# Collect predicted churn customers
test_data$predicted_prob <- predictions[, 2]
churn_customers <- test_data %>%
  filter(predicted_prob > 0.5)  # Customers predicted to leave

# Calculate predicted revenue loss
predicted_loss <- sum(churn_customers$MonthlyCharges)
print(paste("Predicted monthly revenue loss:", predicted_loss))
## [1] "Predicted monthly revenue loss: 149.43356529028"
# Retention Incentive Scheme
# Assume offering a 20% discount on monthly charges for retention
discount_rate <- 0.2
retention_cost <- sum(churn_customers$MonthlyCharges * discount_rate)

# Compare cost vs. benefit
retained_revenue <- predicted_loss - retention_cost
print(paste("Retained revenue after applying incentives:", retained_revenue))
## [1] "Retained revenue after applying incentives: 119.546852232224"
# Summarize results
cat("Key Insights:\n")
## Key Insights:
cat("- Predicted monthly revenue loss if no action is taken:", predicted_loss, "\n")
## - Predicted monthly revenue loss if no action is taken: 149.4336
cat("- Cost of retention incentive (20% discount):", retention_cost, "\n")
## - Cost of retention incentive (20% discount): 29.88671
cat("- Net benefit of incentive:", retained_revenue, "\n")
## - Net benefit of incentive: 119.5469