R/RcppExports.R

In tommasorigon/PhDPack: Useful script to survive PhD

# This file was generated by Rcpp::compileAttributes
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#' Distance matrix for a MCMC output
#' 
#' @export
clusterdist <- function(cluster) {
    .Call('PhDPack_clusterdist', PACKAGE = 'PhDPack', cluster)
}

#' @export
timesTwo <- function(x) {
    .Call('PhDPack_timesTwo', PACKAGE = 'PhDPack', x)
}

#' K-nearest neighbour with arbitrary distance
#' 
#' @export
knn <- function(y, type, distance, k) {
    .Call('PhDPack_knn', PACKAGE = 'PhDPack', y, type, distance, k)
}

nu_update <- function(V) {
    .Call('PhDPack_nu_update', PACKAGE = 'PhDPack', V)
}

V_update <- function(Z, alpha, H) {
    .Call('PhDPack_V_update', PACKAGE = 'PhDPack', Z, alpha, H)
}

Z_update <- function(data, nu, u, theta, kappa) {
    .Call('PhDPack_Z_update', PACKAGE = 'PhDPack', data, nu, u, theta, kappa)
}