Create mass.R