powered by
Join two stages in a staged event tree object, updating probabilities and log-likelihood accordingly.
join_stages(object, v, s1, s2)
the staged event tree where s1 and s2 are joined.
s1
s2
an object of class sevt.
sevt
variable.
first stage.
second stage.
This function joins two stages associated to the same variable, updating probabilities and log-likelihood if the object was fitted.
model <- full(PhDArticles, lambda = 0) model <- stages_fbhc(model) model$stages$Kids model <- join_stages(model, "Kids", "5", "6") model$stages$Kids
Run the code above in your browser using DataLab