R/RcppExports.R

In jhrcook/wext: Weighted Exclusivity Test (WExT)

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

#' Swap a single edge (method 2 in C++)
#'
#' @description Swap an edge of a bipartite graph while maintaining the
#'   bipartite nature. This function is not perfectly named as it runs more
#'   than a single edge swap (whereas the R implemented functions only run a
#'   single swap).
#'
#' @param n1,n2 the graph built as a set of two vectors with the nodes for each edge
#' @param N the number of edges to swap (one at a time)
#' @param max_try number of times to try to find two edges to swap; no message
#'   is relayed for a single unsuccessful edge swap - instead a message at the
#'   end prints the number of successful edge swaps in total
#' @param quiet boolean for if you want a message if not \code{N} edge swaps
#'   are performed
#'
#' @return \code{n1} with nodes swapped
#'
#' @export swap_an_edgeC
swap_an_edgeC <- function(n1, n2, N, max_try, quiet) {
    .Call(`_wext_swap_an_edgeC`, n1, n2, N, max_try, quiet)
}