fixed scales::label_number_si() deprecated

epicentre-msf · Dec 14, 2023 · 6a49130 · 6a49130
1 parent 3bd5704
commit 6a49130
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 38 deletions.
diff --git a/.DS_Store b/.DS_Store
diff --git a/R/pyramid.R b/R/pyramid.R
@@ -172,7 +172,8 @@ pyramid_brks <- function(x, n = 3) {
 
 #' @noRd
 pyramid_labs <- function(x) {
-  scales::label_number_si()(abs(x))
+  #scales::label_number_si()(abs(x))
+  scales::label_number()(abs(x))
 }
 
 #' @noRd

diff --git a/R/theme.R b/R/theme.R
@@ -114,9 +114,9 @@ epi_ggtheme <- function (base_family = "sans",
     }
     else {
       ret <- ret + theme(axis.line.x = element_line(color = axis_col,
-                                                    linewidth = 0.15))
+                                                    linewidth = 0.15),
 
-      ret <- ret + theme(axis.line.y = element_line(color = axis_col,
+                         axis.line.y = element_line(color = axis_col,
                                                     linewidth = 0.15))
     }
   }

diff --git a/man/epi_ggtheme.Rd b/man/epi_ggtheme.Rd