R: Geometric mean

gm(x) 

But this requires package heR.Misc so you might as well just use:

exp(mean(log(x)))

Comments are closed.