dataset <- read.csv(file='data.csv')
summary(dataset)
## X1 X2
## Min. : 2.00 Min. : 2.00
## 1st Qu.: 5.00 1st Qu.: 4.75
## Median : 9.50 Median : 8.00
## Mean :12.17 Mean :10.83
## 3rd Qu.:17.50 3rd Qu.:11.00
## Max. :29.00 Max. :36.00
Data Plot