Function in r (10/15)

Function in r