R/RcppExports.R

Defines functions psrkg pcrksum_str crksum_str cumcrksum Fcom_vec Fcom Fi_vec Ftot_vec Ftot Fi Fprop

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

Fprop <- function(x, clus, nvec, m, n) {
    .Call(`_clusrank_Fprop`, x, clus, nvec, m, n)
}

Fi <- function(X, I, x, clus, nvec, N) {
    .Call(`_clusrank_Fi`, X, I, x, clus, nvec, N)
}

Ftot <- function(X, x, clus, nvec, N, M) {
    .Call(`_clusrank_Ftot`, X, x, clus, nvec, N, M)
}

Ftot_vec <- function(x, clus, nvec, N, M) {
    .Call(`_clusrank_Ftot_vec`, x, clus, nvec, N, M)
}

Fi_vec <- function(x, clus, nvec, N, M) {
    .Call(`_clusrank_Fi_vec`, x, clus, nvec, N, M)
}

Fcom <- function(X, x, clus, nvec, N, M) {
    .Call(`_clusrank_Fcom`, X, x, clus, nvec, N, M)
}

Fcom_vec <- function(x, clus, nvec, N, M) {
    .Call(`_clusrank_Fcom_vec`, x, clus, nvec, N, M)
}

cumcrksum <- function(rks, I, Score, Csize) {
    .Call(`_clusrank_cumcrksum`, rks, I, Score, Csize)
}

crksum_str <- function(k, x, xc, max) {
    .Call(`_clusrank_crksum_str`, k, x, xc, max)
}

pcrksum_str <- function(k, x, xc, xn, n, max) {
    .Call(`_clusrank_pcrksum_str`, k, x, xc, xn, n, max)
}

psrkg <- function(srk, Score) {
    .Call(`_clusrank_psrkg`, srk, Score)
}

Try the clusrank package in your browser

Any scripts or data that you put into this service are public.

clusrank documentation built on Aug. 12, 2022, 9:06 a.m.