Takes a rlda
object produced and provides the log-likelihood.
# S3 method for rlda
logLik(object, ...)
a rlda
object
other arguments may be useful.
Get the log-likelihood of the model.
# NOT RUN {
library(Rlda)
#Load data
data(presence)
#Set seed
set.seed(9842)
#Hyperparameters for each prior distribution
gamma <-0.01
alpha0<-0.01
alpha1<-0.01
#Execute the LDA for the Binomial entry
res<-rlda.bernoulli(presence, 10, alpha0, alpha1, gamma,
5000, TRUE, FALSE)
#log-likelihood
logLik(res)
# }
Run the code above in your browser using DataLab