Update EcclesScRapR.R