Create coRfull.R