initial upload of R file