Skip to contents

Produces exposure-response curves, city-specific forest plots, and BLUP spaghetti plots from a climasus_pool object returned by sus_mod_pool().

Usage

sus_mod_plot_pool(
  x,
  type = c("overall", "forest", "spaghetti"),
  output_type = c("plot", "table", "all"),
  interactive = FALSE,
  base_size = 12L,
  save_plot = NULL,
  lang = c("pt", "en", "es"),
  verbose = FALSE
)

Arguments

x

A climasus_pool object produced by sus_mod_pool().

type

Character. Plot type: "overall" (default), "forest", or "spaghetti".

output_type

Character. "plot" (default), "table", or "all" (named list $plot, $table, $data).

interactive

Logical. TRUE converts the ggplot2 output to an interactive plotly widget. Default FALSE.

base_size

Numeric. ggplot2 base font size. Default 12.

save_plot

Character or NULL. File path to save the plot.

lang

Character. Language for labels: "pt" (default), "en", "es".

verbose

Logical. Print progress messages. Default FALSE.

Value

Depending on output_type:

  • "plot" -> a ggplot or plotly object.

  • "table" -> a tibble of the plotted data.

  • "all" -> a named list: $plot, $table, $data.

Plot types (type)

typeDescription
"overall"Pooled exposure-response curve with CI ribbon
"forest"City-specific RR at exposure p75 with CI (original and BLUP)
"spaghetti"Per-city BLUP curves overlaid on the pooled curve

Examples

if (FALSE) { # \dontrun{
pool <- sus_mod_pool(fits, lang = "pt")

sus_mod_plot_pool(pool, type = "overall",   lang = "pt")
sus_mod_plot_pool(pool, type = "forest",    lang = "en")
sus_mod_plot_pool(pool, type = "spaghetti", lang = "en")
out <- sus_mod_plot_pool(pool, output_type = "all")
out$table
} # }