adding R file