Create rft_doMC.r

Here is Jack's code having dopar incorporated.