loglratio.Rd
Compute log-likelihood ratio for ghype models.
loglratio(mod0, mod1)
mod0 | ghype, null model |
---|---|
mod1 | ghype, alternative model |
scalar, log-likelihood ratio
data('adj_karate') sc.model <- scm(adj_karate, FALSE, FALSE) full.model <- ghype(adj_karate, FALSE, FALSE) loglratio(sc.model,full.model)#> [1] -324.9212