# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
COMCLUST <- function(trees) {
.Call(`_TreeDist_COMCLUST`, trees)
}
consensus_info <- function(trees, phylo, p) {
.Call(`_TreeDist_consensus_info`, trees, phylo, p)
}
robinson_foulds_all_pairs <- function(tables) {
.Call(`_TreeDist_robinson_foulds_all_pairs`, tables)
}
lapjv <- function(x, maxX) {
.Call(`_TreeDist_lapjv`, x, maxX)
}
cpp_mast <- function(edge1, edge2, nTip) {
.Call(`_TreeDist_cpp_mast`, edge1, edge2, nTip)
}
cpp_nni_distance <- function(edge1, edge2, nTip) {
.Call(`_TreeDist_cpp_nni_distance`, edge1, edge2, nTip)
}
path_vector <- function(edge) {
.Call(`_TreeDist_path_vector`, edge)
}
vec_diff_euclidean <- function(vec1, vec2) {
.Call(`_TreeDist_vec_diff_euclidean`, vec1, vec2)
}
pair_diff_euclidean <- function(vecs) {
.Call(`_TreeDist_pair_diff_euclidean`, vecs)
}
reduce_trees <- function(x, y, original_label) {
.Call(`_TreeDist_reduce_trees`, x, y, original_label)
}
mismatch_size <- function(x, y) {
.Call(`_TreeDist_mismatch_size`, x, y)
}
confusion <- function(x, y) {
.Call(`_TreeDist_confusion`, x, y)
}
keep_and_reroot <- function(tree1, tree2, keep) {
.Call(`_TreeDist_keep_and_reroot`, tree1, tree2, keep)
}
keep_and_reduce <- function(tree1, tree2, keep) {
.Call(`_TreeDist_keep_and_reduce`, tree1, tree2, keep)
}
cpp_robinson_foulds_distance <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_robinson_foulds_distance`, x, y, nTip)
}
cpp_robinson_foulds_info <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_robinson_foulds_info`, x, y, nTip)
}
cpp_matching_split_distance <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_matching_split_distance`, x, y, nTip)
}
cpp_jaccard_similarity <- function(x, y, nTip, k, allowConflict) {
.Call(`_TreeDist_cpp_jaccard_similarity`, x, y, nTip, k, allowConflict)
}
cpp_msi_distance <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_msi_distance`, x, y, nTip)
}
cpp_mutual_clustering <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_mutual_clustering`, x, y, nTip)
}
cpp_shared_phylo <- function(x, y, nTip) {
.Call(`_TreeDist_cpp_shared_phylo`, x, y, nTip)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.