gnoblet/visualizeR
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix typo in scale_color_visualizer_continuous guide argument

Browse source
This commit is contained in:
gnoblet 2025-07-02 13:41:22 +02:00
parent 1584bdca30
commit 186fce48da
1 changed files with 21 additions and 25 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

46
R/scale.R
View file

@ -9,12 +9,11 @@
#'
#' @export
scale_color_visualizer_discrete <- function(
palette = "cat_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...
) {
palette = "cat_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...) {
if (!(is.null(palette))) {
ggplot2::discrete_scale(
"color",
@ -47,12 +46,11 @@ scale_color_visualizer_discrete <- function(
#'
#' @export
scale_fill_visualizer_discrete <- function(
palette = "cat_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...
) {
palette = "cat_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...) {
if (!(is.null(palette))) {
ggplot2::discrete_scale(
"fill",
@ -85,12 +83,11 @@ scale_fill_visualizer_discrete <- function(
#'
#' @export
scale_fill_visualizer_continuous <- function(
palette = "seq_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...
) {
palette = "seq_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...) {
if (!(is.null(palette))) {
pal <- palette_gen(palette, "continuous", direction)
@ -124,12 +121,11 @@ scale_fill_visualizer_continuous <- function(
#'
#' @export
scale_color_visualizer_continuous <- function(
palette = "seq_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...
) {
palette = "seq_5_main",
direction = 1,
reverse_guide = TRUE,
title_position = NULL,
...) {
if (!(is.null(palette))) {
pal <- palette_gen(palette, "continuous", direction)
@ -154,7 +150,7 @@ scale_color_visualizer_continuous <- function(
# ticks.colour = "#F1F3F5",
reverse = reverse_guide
),
....
...
)
}
}