Create rem.R