# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
colSumsSub <- function(mat, rowIDs) {
.Call(`_MSETools_colSumsSub`, mat, rowIDs)
}
dec <- function(I, p) {
.Call(`_MSETools_dec`, I, p)
}
decClique <- function(cliques, p) {
.Call(`_MSETools_decClique`, cliques, p)
}
computeML <- function(inPlace, j, compMat, C, S, denominator, p) {
invisible(.Call(`_MSETools_computeML`, inPlace, j, compMat, C, S, denominator, p))
}
computeLogPostProbs <- function(compMat, graphs, denominator, p) {
.Call(`_MSETools_computeLogPostProbs`, compMat, graphs, denominator, p)
}
rowAdd <- function(mat, v) {
invisible(.Call(`_MSETools_rowAdd`, mat, v))
}
colAdd <- function(mat, v) {
invisible(.Call(`_MSETools_colAdd`, mat, v))
}
expNormalize <- function(mat) {
invisible(.Call(`_MSETools_expNormalize`, mat))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.