Warning: le package 'corrplot' a été compilé avec la version R 4.4.2

On considère dans ce TD le jeu de données wine.csv, disponible sur connect, donnant des informations sur un échantillon de 1599 vins.
On s’intéressera aux différents indices de position, de dispersion, et aux outliers. On n’oubliera pas d’effectuer une représentation graphique de ces variables.
A l’aide de la fonction ggpairs()du package GGally, réaliser un nuage de points pour chacun des couples de variables quantitatives du data-frame.
Déterminer la matrice de corrélation de ces variables. Commenter.
A l’aide de la fonction corrplot(), issue du package du même nom, représenter graphiquement cette matrice de corrélation.
Warning: le package 'corrplot' a été compilé avec la version R 4.4.2

2)Résumer cette variable dans un tableau, et la représenter graphiquement :
Créer une fonction VAR() donnant pour un vecteur \(x\) sa variance : \[Var(x) = \dfrac{1}{n} \sum_{i=1}^n (x_i-\overline{x})^2\]
Calculer, pour chaque catégorie d’alcool :
Mettre en facteur la variable quality. Résumer cette dernière variable qualitative par un tableau, et la représenter graphiquement.
Dresser la table de contingence des variables quality et cat_alcohol. On pourra utiliser la fonction table().
Calculer la valeur du coefficient \(\chi^2\) d’écart à l’indépendance pour ces deux variables qualitatives. Commenter.
On pourra utiliser la fonction chisq.test() et l’aide de R.