This function returns TRUE
for VLMC models and FALSE
for other objects.
Examples
pc <- powerconsumption[powerconsumption$week == 5, ]
dts <- cut(pc$active_power, breaks = c(0, quantile(pc$active_power, probs = c(0.25, 0.5, 0.75, 1))))
model <- vlmc(dts)
# should be true
is_ctx_tree(model)
#> [1] TRUE
# should be true
is_vlmc(model)
#> [1] TRUE
# should be false
is_covlmc(model)
#> [1] FALSE