Text is black font
insert my code: make a chunk
minutes <- c(40, 50, -5, 0, 10, 20, 30, 6, 2, 15, 50, 25, 30, 45, 35, 8 )
summary(minutes)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## -5.00 7.50 22.50 22.56 36.25 50.00
hist(minutes)