Calculates the geometric mean or standard deviation of a vector of numeric values.
1 2 3
Vector of numeric values.
Logical indicating whether to remove missing values or not.
Logical indicating whether to ignore or remove zero or negative values found in
The geometric mean is computed by log transforming the raw data in
x, computing the arithmetic mean of the transformed data, and back-transforming this mean to the geometric mean by exponentiating.
The geometric standard deviation is computed by log transforming the raw data in
x, computing the arithmetic standard deviation of the transformed data, and back-transforming this standard deviation to the geometric standard deviation by exponentiating.
A numeric value that is the geometric mean or geometric standard deviation of the numeric values in
This function is largely an implementation of the code suggested by Russell Senior on R-help in November, 1999.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
## generate random lognormal data d <- rlnorm(500,meanlog=0,sdlog=1) # d has a mean on log scale of 0; thus, gm should be exp(0)~=1 # d has a sd on log scale of 1; thus, gsd should be exp(1)~=2.7 geomean(d) geosd(d) ## Not run: ## Demonstrate handling of zeros and negative values x <- seq(-1,5) # this will given an error geomean(x) # this will only give a warning, but might not be what you want geomean(x,zneg.rm=TRUE) ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.