Generate table of journal paper percentages, by continent and year

Usage

scatter_figure1(data, method = "lm", original = TRUE, plotly = TRUE, ...)

Arguments

data: The processed dataframe of data
method: Which method to use for the regression line, either "lm" (default) or "loess".
original: Logical; if TRUE, attempts to mimic Arnett's (2008) Figure 1 in style.
plotly: Logical, whether to use plotly for dynamic data visualization.
...: Further arguments passed to rempsyc::nice_scatter

Examples

# \dontshow{
.old_wd <- setwd(tempdir())
# }
if (FALSE) {
pubmed_query_string <- paste(
  "Developmental Psychology [Journal]",
  "OR Journal of Personality and Social Psychology [Journal]",
  "OR Journal of Abnormal Psychology [Journal]",
  "OR Journal of Family Psychology [Journal]",
  "OR Health Psychology [Journal]",
  "OR Journal of Educational Psychology [Journal]"
)

save_process_pubmed_batch(
  pubmed_query_string,
  year_low = 2023,
  year_high = 2023
)
data <- read_bind_all_data()
scatter_figure1(data)
}
# \dontshow{
unlink("easyPubMed_data_01.txt")
setwd(.old_wd)
# }