psychtm (version 2021.1.0)

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

Description

Create generic theta<- function for class

Usage

theta(x) <- value

Arguments

x

An Sldax object.

value

Numeric array of topic proportions 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)))
theta(m1) <- array(c(0.5, 0.5), dim = c(1, 2, 1))
# }