powered by
logpost<-
Create generic logpost<- function for class
logpost(x) <- value
An Model object.
Model
Numeric vector of log posteriors to assign to slot.
None.
# NOT RUN { m1 <- Model(ndocs = 1) logpost(m1) <- rep(NaN, times = nchain(m1)) # }
Run the code above in your browser using DataLab