Create R.Training.3.1.R