Working on CGEA script.  Added GeometricMean to Utils.R.