Funnel Plot for Publication-Bias Models

Draws a funnel plot from a fitted pub_bias object.

funnel_plot(object, ...)

# S3 method for class 'pub_bias'
funnel_plot(
  object,
  y_axis = c("se", "precision"),
  center = c("adjusted", "observed", "none"),
  show_contours = TRUE,
  contour_levels = c(0.9, 0.95),
  point_cex = 0.9,
  point_col = "#1F4E79",
  xlab = "Effect size",
  ylab = NULL,
  main = "Funnel Plot",
  ...
)

Arguments

object

A fitted object returned by publication_bias.

...

Additional arguments passed to plot.

y_axis

One of "se" (standard error) or "precision".

center

Which center line to draw: "adjusted", "observed", or "none".

show_contours

Logical; whether to draw pseudo-confidence contours.

contour_levels

Numeric vector of contour levels.

point_cex

Point size scaling.

point_col

Point color.

xlab

X-axis label.

ylab

Optional y-axis label.

main

Plot title.

Value

Invisibly returns the plotting data frame.

Examples

if (FALSE) { # \dontrun{
fit <- mars(
  formula = yi ~ 1,
  data = bcg,
  studyID = "trial",
  variance = "vi",
  varcov_type = "univariate",
  structure = "univariate",
  estimation_method = "MLE"
)
pb <- publication_bias(fit, method = "beta_selection")
funnel_plot(pb)
} # }