Create mean.wrap.r