First Markdown

data <- c(37, 64, 32, 28, 50, 70, 8, 9, 88, 14, 10, 25)

Calculate summry statistics

mean(data)
## [1] 36.25
summary(data)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##    8.00   13.00   30.00   36.25   53.50   88.00

Create a boxplot

boxplot(data)