Plot the Difference Network Between Two Models

Plots the difference network between model x and model y. The edges are computed from subtracting the two models. The pie chart is the difference in initial probabilities between model x and model y. Green color indicates that xis greater than yand red indicates otherwise.

Usage

plot_compare(x, ...)

# S3 method for class 'tna'
plot_compare(
  x,
  y,
  theme = NULL,
  palette = "colorblind",
  posCol = "#009900",
  negCol = "red",
  ...
)

Arguments

x

A tna object. This is the the principal model.

...

Additional arguments passed to qgraph::qgraph().

y

A tna object. This is the model subtracted from the principal model.

theme

See qgraph::qgraph().

palette

See qgraph::qgraph().

posCol

Color for plotting edges and pie when the first group has a higher value. See qgraph::qgraph().

negCol

Color for plotting edges and pie when the second group has a higher value. See qgraph::qgraph().

Value

A qgraph object displaying the difference network between the two models.

See also

Model comparison functions compare(), compare.group_tna(), compare_sequences(), plot.tna_comparison(), plot.tna_sequence_comparison(), plot_compare.group_tna(), print.tna_comparison(), print.tna_sequence_comparison()

Examples

model_x <- tna(group_regulation[group_regulation[, 1] == "plan", ])
model_y <- tna(group_regulation[group_regulation[, 1] != "plan", ])
plot_compare(model_x, model_y)