Représentation graphique des variables ayant le plus fort coefficient de corrélartion avec le taux d’abstention

par(mfrow=c(2,3))
plot(final.lm[,70],final.lm[,9],xlab = "Taux d'abstention",ylab = "Pourcentage de résidences principales construites de 1946 à 1990")
plot(final.lm[,70],final.lm[,17],xlab = "Taux d'abstention",ylab = "Pourcentage de personnes des résidences principales HLM louées vides")
plot(final.lm[,70],final.lm[,69],xlab = "Taux d'abstention",ylab = "% d'actifs occupés de 15 ans ou + utilisant les transports en commun pour aller travailler")
plot(final.lm[,70],final.lm[,1],xlab = "Taux d'abstention",ylab = "Pourcentage de résidences secondaires et logements occasionnels")
plot(final.lm[,70],final.lm[,8],xlab = "Taux d'abstention",ylab = "Pourcentage de résidences principales construites avant 2010")
plot(final.lm[,70],final.lm[,23],xlab = "Taux d'abstention",ylab = "Pourcentage d'hommes de plus de 30 ans")