# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
CalcLikelihoodC <- function(dtm, phi, theta) {
.Call(`_textmineR_CalcLikelihoodC`, dtm, phi, theta)
}
CalcSumSquares <- function(dtm, phi, theta, ybar) {
.Call(`_textmineR_CalcSumSquares`, dtm, phi, theta, ybar)
}
Dtm2DocsC <- function(dtm, vocab) {
.Call(`_textmineR_Dtm2DocsC`, dtm, vocab)
}
Hellinger_cpp <- function(p, q) {
.Call(`_textmineR_Hellinger_cpp`, p, q)
}
HellingerMat <- function(A) {
.Call(`_textmineR_HellingerMat`, A)
}
JSD_cpp <- function(p, q) {
.Call(`_textmineR_JSD_cpp`, p, q)
}
JSDmat <- function(A) {
.Call(`_textmineR_JSDmat`, A)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.