Create pnorm.R