# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
.simulate_dyad <- function(rates, mimicry, meal_length = 1.0, maxiter = 1000L) {
.Call(`_biteme_simulate_dyad`, rates, mimicry, meal_length, maxiter)
}
.shuffle_bites_sorted <- function(data, ids) {
.Call(`_biteme_shuffle_bites_sorted`, data, ids)
}
.shuffle_bites_unsorted <- function(data) {
.Call(`_biteme_shuffle_bites_unsorted`, data)
}
#' @param A data.frame or numeric matrix. The first column should be time and
#' the second column the ids.
#' @noRd
.timegap <- function(data) {
.Call(`_biteme_timegap`, data)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.