Skip to contents

Plot Prior Density of w1

Usage

plot_w1_prior(
  fit = NULL,
  a = NULL,
  b = NULL,
  engine = c("ggplot2", "base"),
  base_size = 11,
  thresholds = c(0.5, 0.9),
  n_grid = 500,
  show = TRUE
)

Arguments

fit

A DPprior_fit object, or NULL if a, b provided directly.

a

Numeric; shape parameter (used if fit is NULL).

b

Numeric; rate parameter (used if fit is NULL).

engine

"ggplot2" (default) or "base".

base_size

Base font size.

thresholds

Dominance thresholds (default: c(0.5, 0.9)).

n_grid

Number of grid points.

show

If TRUE, print the plot.

Value

A ggplot object or invisible(NULL) for base.

Examples

fit <- DPprior_fit(J = 50, mu_K = 5, var_K = 8)
#> Warning: HIGH DOMINANCE RISK: P(w1 > 0.5) = 48.1% exceeds 40%.
#>   This may indicate unintended prior behavior (RN-07).
#>   Consider using DPprior_dual() for weight-constrained elicitation.
#>   See ?DPprior_diagnostics for interpretation.
plot_w1_prior(fit)



plot_w1_prior(a = 1.6, b = 1.2)