R Code 3

RegRun