Sarah Shikangah
7/1/2017
An interactive application featuring the use of Shiny to present statistical data visualization and analysis of the effect of ingredients to the quality outcome of the wine. By use of drop down menu, a usser can select individual ingredient to evaluate the relationship with quality. A statistical logistic regression of all the variables(ingredients) is also provided under the tab summary.
### Required packages
## Get data, Clean and subset
library(rsconnect)
library(shiny)
dat <- read.csv("https://archive.ics.uci.edu/ml/machine-learning-databases/wine-quality/winequality-red.csv", sep = ";")
dat$quality <- as.factor(dat$quality)
anyNA(dat)
[1] FALSE