fix example

IndrajeetPatil · Sep 24, 2023 · 3aa18d2 · 3aa18d2
1 parent f4de51e
commit 3aa18d2
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 9 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -32,8 +32,8 @@
 #'   colors allowed by `"Dark2"` palette from the `{RColorBrewer}` package.
 #'
 #' @examples
-#' .is_palette_sufficient("RColorBrewer", "Dark2", 6L)
-#' .is_palette_sufficient("RColorBrewer", "Dark2", 12L)
+#' ggstatsplot:::.is_palette_sufficient("RColorBrewer", "Dark2", 6L)
+#' ggstatsplot:::.is_palette_sufficient("RColorBrewer", "Dark2", 12L)
 #'
 #' @autoglobal
 #' @keywords internal

diff --git a/man/dot-is_palette_sufficient.Rd b/man/dot-is_palette_sufficient.Rd
diff --git a/tests/testthat/_snaps/utils.md b/tests/testthat/_snaps/utils.md
@@ -1,7 +1,7 @@
 # .grouped_list works with non-syntactic group names
 
     Code
-      sleep %>% rename(`my non-syntactic name` = group) %>% ggstatsplot:::.grouped_list(
+      sleep %>% rename(`my non-syntactic name` = group) %>% .grouped_list(
         grouping.var = `my non-syntactic name`) %>% str()
     Output
       List of 2
@@ -19,7 +19,7 @@
 # .is_palette_sufficient is working
 
     Code
-      ggstatsplot:::.is_palette_sufficient("RColorBrewer", "Dark2", 20L)
+      .is_palette_sufficient("RColorBrewer", "Dark2", 20L)
     Message <rlang_message>
       Number of labels is greater than default palette color count.
       * Select another color `palette` (and/or `package`).

diff --git a/tests/testthat/test-utils.R b/tests/testthat/test-utils.R
@@ -7,7 +7,7 @@ test_that(
     expect_snapshot({
       sleep %>%
         rename("my non-syntactic name" = group) %>%
-        ggstatsplot:::.grouped_list(grouping.var = `my non-syntactic name`) %>%
+        .grouped_list(grouping.var = `my non-syntactic name`) %>%
         str()
     })
   }
@@ -18,8 +18,8 @@ test_that(
 test_that(
   desc = ".is_palette_sufficient is working",
   code = {
-    expect_no_condition(ggstatsplot:::.is_palette_sufficient("RColorBrewer", "Dark2", 2L))
-    expect_snapshot(ggstatsplot:::.is_palette_sufficient("RColorBrewer", "Dark2", 20L))
+    expect_no_condition(.is_palette_sufficient("RColorBrewer", "Dark2", 2L))
+    expect_snapshot(.is_palette_sufficient("RColorBrewer", "Dark2", 20L))
   }
 )