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, posCol = "#009900", negCol = "red", ...)

Arguments

x

A tna object. This is the the principal model.

...

Additional arguments passed to cograph::splot().

y

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

posCol

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

negCol

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

Value

A cograph_network 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)