Compute posterior probability of learning

Returns P(gk | data) for each individual, representing the probability that the individual truly learned (vs. guessing or already knowing).

posterior_learned(fit)

Arguments

fit

output from fit_person_lca()

Value

numeric vector of P(learned | data) for each individual

Examples

sim <- simulate_lca(n = 100, gk = 0.30, seed = 123, return_classes = TRUE)
fit <- fit_person_lca(sim$pre, sim$post)
p_learned <- posterior_learned(fit)
cor(p_learned, sim$learned)
#> [1] 0.766887