indlogPost {GDINA}

Extract log posterior for each individual

Description

Extract individual log posterior.

Usage

indlogPost(object, ...)

Arguments

object

GDINA object

...

additional arguments

Examples

## Not run: 
dat <- sim10GDINA$simdat
Q <- sim10GDINA$simQ
fit <- GDINA(dat = dat, Q = Q, model = "GDINA")
iP <- indlogPost(fit)
iP[1:6,]

## End(Not run)