tsnet (version 0.1.0)

plot.compare_gvar: Plot compare_gvar

Description

This function is a plotting method for the class produced by [compare_gvar()]. It generates a plot showing the density of posterior uncertainty distributions for distances and the empirical distance value for two GVAR models.

Usage

# S3 method for compare_gvar
plot(x, name_a = NULL, name_b = NULL, ...)

Value

A ggplot object representing the density plots of the posterior uncertainty distributions for distances and the empirical distance for two GVAR models.

Arguments

x

An object of class "compare_gvar".

name_a

Optional. The name for model A. If provided, it replaces "mod_a" in the plot.

name_b

Optional. The name for model B. If provided, it replaces "mod_b" in the plot.

...

Additional arguments to be passed to the plotting functions.

Details

The function first checks if the full reference distributions of [compare_gvar()] are saved using the argument 'return_all' set to TRUE. If not, an error is thrown.

Using the "name_a" and "name_b" arguments allows for custom labeling of the two models in the plot.

The function generates two density plots using `ggplot2`, one for the temporal network (beta) and another for the contemporaneous network (pcor). The density distributions are filled with different colors based on the corresponding models (mod_a and mod_b). The empirical distances between the networks are indicated by red vertical lines.

Examples

# \donttest{
data(fit_data)
test_res <- compare_gvar(fit_data[[1]],
fit_data[[2]],
n_draws = 100,
return_all = TRUE)
plot(test_res)
# }