# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
bmat_schC <- function(v1, v2, v3, section_counts) {
.Call('_rlme_bmat_schC', PACKAGE = 'rlme', v1, v2, v3, section_counts)
}
bmat2C <- function(v1, v2, sec) {
.Call('_rlme_bmat2C', PACKAGE = 'rlme', v1, v2, sec)
}
pairup <- function(vec, type = "less") {
.Call('_rlme_pairup', PACKAGE = 'rlme', vec, type)
}
remove_k_smallest <- function(v, k) {
.Call('_rlme_remove_k_smallest', PACKAGE = 'rlme', v, k)
}
rhoschC <- function(ahat, section_counts, student_counts) {
.Call('_rlme_rhoschC', PACKAGE = 'rlme', ahat, section_counts, student_counts)
}
rhosectC <- function(ahat, section_counts, student_counts) {
.Call('_rlme_rhosectC', PACKAGE = 'rlme', ahat, section_counts, student_counts)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.