R 语言Analyzing wine data

knitr::opts_chunk$set(echo = TRUE)

Assignment 1 Q2

Analyzing wine data (30 points)

The data for this exercise comes from a paper by Cortez, et al. (2009)
(https://www.sciencedirect.com/science/article/abs/pii/S0167923609001377?via%3Dihub) where the authors
were trying to relate various chemical properties of red and white wine to perceived quality. For this question,
we will analyze only the data for the chemical properties, not the quality. Also the original paper looked at red
and white wine, we will only use the data for the red.
The data can be read in via

library(tidyverse)
library(gridExtra)
library(ggcorrplot)
library(psych)
library(factoextra)

wine_data<-read_csv("red_wine_data.csv") # Be sure this is in your current working directory
glimpse(w