Create protMass.R