R/RcppExports.R

Defines functions cpp_triangle_inequality minkowski_cdist minkowski_pdist minkowski_rdist maximum_cdist maximum_pdist maximum_rdist manhattan_cdist manhattan_pdist manhattan_rdist jaccard_cdist jaccard_pdist jaccard_rdist hamming_cdist hamming_pdist hamming_rdist farthest_point_sampling_cpp euclidean_cdist euclidean_pdist euclidean_rdist cdist_cpp pdist_cpp rdist_cpp canberra_cdist canberra_pdist canberra_rdist

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

canberra_rdist <- function(A) {
    .Call(`_rdist_canberra_rdist`, A)
}

canberra_pdist <- function(A) {
    .Call(`_rdist_canberra_pdist`, A)
}

canberra_cdist <- function(A, B) {
    .Call(`_rdist_canberra_cdist`, A, B)
}

rdist_cpp <- function(A, metric, p = 2) {
    .Call(`_rdist_rdist_cpp`, A, metric, p)
}

pdist_cpp <- function(A, metric, p = 2) {
    .Call(`_rdist_pdist_cpp`, A, metric, p)
}

cdist_cpp <- function(A, B, metric, p = 2) {
    .Call(`_rdist_cdist_cpp`, A, B, metric, p)
}

euclidean_rdist <- function(A) {
    .Call(`_rdist_euclidean_rdist`, A)
}

euclidean_pdist <- function(A) {
    .Call(`_rdist_euclidean_pdist`, A)
}

euclidean_cdist <- function(A, B) {
    .Call(`_rdist_euclidean_cdist`, A, B)
}

farthest_point_sampling_cpp <- function(mat, metric, k, initial_point_index = 0L, return_clusters = FALSE) {
    .Call(`_rdist_farthest_point_sampling_cpp`, mat, metric, k, initial_point_index, return_clusters)
}

hamming_rdist <- function(A) {
    .Call(`_rdist_hamming_rdist`, A)
}

hamming_pdist <- function(A) {
    .Call(`_rdist_hamming_pdist`, A)
}

hamming_cdist <- function(A, B) {
    .Call(`_rdist_hamming_cdist`, A, B)
}

jaccard_rdist <- function(A) {
    .Call(`_rdist_jaccard_rdist`, A)
}

jaccard_pdist <- function(A) {
    .Call(`_rdist_jaccard_pdist`, A)
}

jaccard_cdist <- function(A, B) {
    .Call(`_rdist_jaccard_cdist`, A, B)
}

manhattan_rdist <- function(A) {
    .Call(`_rdist_manhattan_rdist`, A)
}

manhattan_pdist <- function(A) {
    .Call(`_rdist_manhattan_pdist`, A)
}

manhattan_cdist <- function(A, B) {
    .Call(`_rdist_manhattan_cdist`, A, B)
}

maximum_rdist <- function(A) {
    .Call(`_rdist_maximum_rdist`, A)
}

maximum_pdist <- function(A) {
    .Call(`_rdist_maximum_pdist`, A)
}

maximum_cdist <- function(A, B) {
    .Call(`_rdist_maximum_cdist`, A, B)
}

minkowski_rdist <- function(A, p) {
    .Call(`_rdist_minkowski_rdist`, A, p)
}

minkowski_pdist <- function(A, p) {
    .Call(`_rdist_minkowski_pdist`, A, p)
}

minkowski_cdist <- function(A, B, p) {
    .Call(`_rdist_minkowski_cdist`, A, B, p)
}

cpp_triangle_inequality <- function(mat, tolerance = 0) {
    .Call(`_rdist_cpp_triangle_inequality`, mat, tolerance)
}

Try the rdist package in your browser

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

rdist documentation built on May 4, 2020, 5:13 p.m.