Using Data to Improve a Marketing Promotion Dataset: Dodgers Major League Baseball data from 2012 in dodgers.csv file Objective: Determine what night would be the best to run a marketing promotion...

---
title: "Using Data to Improve a Marketing Promotion"
author: "Author name"
date: "September 11, 2019"
output: word_document
---





```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
##Required packages
```{r warning=FALSE, message=FALSE}
if(!require(tidyverse)) install.packages("tidyverse", dependencies = TRUE)
if(!require(caret)) install.packages("caret", dependencies = TRUE)
library(tidyverse)
library(caret)
```
##Importing data
```{r}
dta <- read.csv("dodgers-y1ahjzr2.csv")
head(dta)
```
##Box plots
```{r}
dta %>%
ggplot(aes(y = attend))+geom_boxplot(fill = "gray")
```
The median number of attendance is around 40,000 and there is no outlier in the data. This variable will be used as the response variable $Y$. In addition, we need to know which variables contribute to increase the the attendance. In the next section, we will train models and make some prediction. We will also select the model that has the best performance.
```{r}
dta %>%
ggplot(aes(y =...