psychtm (version 2021.1.0)

ntopics: Create generic ntopics function for class

Description

Create generic ntopics function for class

Usage

ntopics(x)

Arguments

x

An Sldax object.

Value

Integer number of topics in model.

Examples

# NOT RUN {
m1 <- Sldax(ndocs = 1, nvocab = 2,
            topics = array(c(1, 2, 2, 1), dim = c(1, 4, 1)),
            theta = array(c(0.5, 0.5), dim = c(1, 2, 1)),
            beta = array(c(0.5, 0.5, 0.5, 0.5), dim = c(2, 2, 1)))
ntopics(m1)
# }