---
title: "Module 2 exo 4"
author: "Solenne Roux"
date: "15/03/2021"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

## R Markdown

Statistiques descriptives numériques et graphiques
Examiner le lien entre les notes et les attentes du cours

```{r, echo=TRUE}
library(psych)
describe(DF[,c("note","attente")])

by(DF$note, DF$sexe, describe)

plot(DF$note, DF$attente, col=c("red","green"))

```