Added gglob weighed mean genotype function