R file added

Added R file only