add R file, begin fe