options(mc.core = n)  instead of options(core = n) update for parallel