gmean function

Function to compute the geometric mean of a vector