psychtm (version 2021.1.0)

nvocab<-: Create generic nvocab<- function for class

Description

Create generic nvocab<- function for class

Usage

nvocab(x) <- value

Arguments

x

An Sldax object.

value

Numeric number of unique terms in vocabulary to assign to slot.

Value

None.

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)))
nvocab(m1) <- 2L
# }