{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE) # BAI TAP NHOM 3 ## Red and white wine qualiy ### Thao luan

set up working directory

setwd(“C:/nga 1/RRR”) # load all packages used in this exploratory analysis library(ggplot2) library(GGally)

Analysis

Load the Data

red <- read.csv(‘winequality_red.csv’) white <- read.csv(‘winequality_white.csv’)

add categorical varialbles to both sets

red[‘color’] <- ‘red’ white[‘color’] <- ‘white’

merge red wine and white wine datasets

wine <- rbind(red, white) ## Including Plots

head(wine)

You can also embed plots, for example:

{r pressure, echo=FALSE} plot(pressure)

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.