stagedtrees (version 2.1.0)

join_stages: Join stages

Description

Join two stages in a staged event tree object, updating probabilities and log-likelihood accordingly.

Usage

join_stages(object, v, s1, s2)

Arguments

object

an object of class sevt.

v

variable.

s1

first stage.

s2

second stage.

Value

the staged event tree where s1 and s2 are joined.

Details

This function joins two stages associated to the same variable, updating probabilities and log-likelihood if the object was fitted.

Examples

# NOT RUN {
model <- full(PhDArticles, lambda = 0)
model <- stages_fbhc(model)
model$stages$Kids
model <- join_stages(model, "Kids", "5", "6")
model$stages$Kids
# }