R coding (3/48)

R coding