Calculate geometric coefficient of variation, mean, or SD and round
Source:R/equations1.R
geostats.Rd
Calculate the coefficient of variation
Calculate the geometric mean
Calculate the geometric standard deviation
Usage
geo.cv(num, round = 2, na.rm = TRUE, neg.rm = TRUE, pct = TRUE)
geo.mean(num, round = 2, na.rm = TRUE, neg.rm = TRUE)
geo.sd(num, round = 2, na.rm = TRUE, neg.rm = TRUE)
Arguments
- num
vector of numbers
- round
round result to decimal place
- na.rm
remove NAs from the vector
- neg.rm
remove negative values from the vector
- pct
TRUE or FALSE. should result be in percent
Value
the geometric cv of a set of numbers
the geometric mean of a set of numbers
the geometric standard deviation of a set of numbers
Examples
#simulate numbers using a fixed seed
num1 <- number(n = 1115,max.digits = 4, seed = 10)
#get geometric CV, represent as percent and round to 2 decimal places
geo.cv(num1,round = 2) # result: 60.61%
#> [1] 60.61
#or round to 3 decimal places
geo.cv(num1,round = 3) # result: 60.609%
#> [1] 60.609
#by default, the above examples return a CV%
#if you do not want the result as percentage, specify "pct"
geo.cv(num1,pct = FALSE) # result: 0.61
#> [1] 0.61
num1 <- sample(300:3000,10)
#get the geometric mean, excluding all negatives and round to 2
geo.mean(num1)
#> [1] 1619.56
#or
geo.mean(num1)
#> [1] 1619.56
#get geometric mean, but round the final value to 5 decimal places
geo.mean(num1, round = 5)
#> [1] 1619.555
num1 <- sample(330:400,20)
#get geometric SD remove negative values and round to 2 decimal places
geo.sd(num1)
#> [1] 1.05
#get geometric SD, DON'T remove negative values and round to 2 decimal places
geo.sd(num1,na.rm=FALSE)
#> [1] 1.05
#get geometric SD, remove negative values and round to 3 decimal places
geo.sd(num1,round = 3)
#> [1] 1.049