add default

rempsyc · Apr 29, 2024 · 913d1a6 · 913d1a6
1 parent 6fec0e8
commit 913d1a6
Show file tree

Hide file tree

Showing 4 changed files with 14 additions and 4 deletions.
diff --git a/R/scatter_continent_year.R b/R/scatter_continent_year.R
@@ -30,7 +30,12 @@
 #' @importFrom rlang .data
 #' @export
 
-scatter_continent_year <- function(data, method = "lm", plotly = TRUE, citation, citation_size = 15, ...) {
+scatter_continent_year <- function(data,
+                                   method = "lm",
+                                   plotly = TRUE,
+                                   citation = NULL,
+                                   citation_size = 15,
+                                   ...) {
   insight::check_if_installed("RColorBrewer")
   data <- data %>%
     dplyr::mutate(missing = sum(is.na(.data$continent)) / dplyr::n()) %>%

diff --git a/R/scatter_country_year.R b/R/scatter_country_year.R
@@ -30,7 +30,12 @@
 #' @importFrom rlang .data
 #' @export
 
-scatter_country_year <- function(data, method = "lm", plotly = TRUE, citation, citation_size = 15, ...) {
+scatter_country_year <- function(data,
+                                 method = "lm",
+                                 plotly = TRUE,
+                                 citation = NULL,
+                                 citation_size = 15,
+                                 ...) {
   df_country_year_missing <- data %>%
     dplyr::filter(is.na(.data$country)) %>%
     dplyr::group_by(.data$year) %>%

diff --git a/man/scatter_continent_year.Rd b/man/scatter_continent_year.Rd
diff --git a/man/scatter_country_year.Rd b/man/scatter_country_year.Rd