First R file