diff --git a/R/enhancements.R b/R/enhancements.R index fd23a1b..6bb18e3 100644 --- a/R/enhancements.R +++ b/R/enhancements.R @@ -55,7 +55,7 @@ fingertips_redred <- function(Comparator = "England", ...) { #' fingertips_stats()} #' @export fingertips_stats <- function(proxy_settings = fingertips_proxy_settings()) { - fingertips_stats <- indicators(proxy_settings = fingertips_proxy_settings()) + fingertips_stats <- indicators(proxy_settings = proxy_settings) summarised_stats <- fingertips_stats %>% summarise_if(is.integer, n_distinct) fingertips_stats <- sprintf("On %s Fingertips consisted of %s profiles, made up of %s indicators and %s distinct indicators.",