R code (29/37)

R code