Adding R Codes

Adding R Codes