geomMean function

Take the geometric mean of a vector