From 41a2a356bd9b61c90c04b47aee147bf837223028 Mon Sep 17 00:00:00 2001 From: Johannes Ranke Date: Mon, 21 Oct 2019 15:31:59 +0200 Subject: Improve tests, remove geometric_mean --- R/geometric_mean.R | 4 ---- 1 file changed, 4 deletions(-) delete mode 100644 R/geometric_mean.R (limited to 'R') diff --git a/R/geometric_mean.R b/R/geometric_mean.R deleted file mode 100644 index 646732cd..00000000 --- a/R/geometric_mean.R +++ /dev/null @@ -1,4 +0,0 @@ -geometric_mean <- function(x, na.rm = FALSE) -{ - exp(mean(log(x), na.rm = na.rm)) -} -- cgit v1.2.1