BregFix.RdA simple artificial regression example data set with 3 latent
classes, one independent variable x and a concomitant
variable w.
data("BregFix")A data frame with 200 observations on the following 5 variables.
yesnumber of successes
nonumber of failures
xindependent variable
wconcomitant variable, a factor with levels 0 1
classlatent class memberships
data("BregFix", package = "flexmix")
Model <- FLXMRglmfix(family="binomial",
nested = list(formula = c(~x, ~0), k = c(2, 1)))
Conc <- FLXPmultinom(~w)
FittedBin <- initFlexmix(cbind(yes, no) ~ 1, data = BregFix,
k = 3, model = Model, concomitant = Conc)
#> 3 : * * *
summary(FittedBin)
#>
#> Call:
#> initFlexmix(cbind(yes, no) ~ 1, data = BregFix, model = Model,
#> concomitant = Conc, k = 3)
#>
#> prior size post>0 ratio
#> Comp.1 0.443 90 146 0.616
#> Comp.2 0.216 42 54 0.778
#> Comp.3 0.341 68 123 0.553
#>
#> 'log Lik.' -425.5969 (df=8)
#> AIC: 867.1939 BIC: 893.5804
#>