R CODES USED