This will make a subtitle for my document

Text is in black font

#if i dont put a space after my hashtag

insert my code: make a chunk

Create a vector for my data

#I am tired and I want to finish

minutes <-c(40,50,-5,0,10,20,30,6,45,30,30,2,10,35,15,50,25,
            30,35,45,35,8)

calculate the 5-number summary

 summary(minutes)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   -5.00   10.00   30.00   24.82   35.00   50.00

Create a histogram

hist(minutes)