R/cpp11.R

In timeplyr: Fast Tidy Tools for Date and Date-Time Manipulation

# Generated by cpp11: do not edit by hand

cpp_diff <- function(x, lag, order, run_lengths, fill, differences) {
  .Call(`_timeplyr_cpp_diff`, x, lag, order, run_lengths, fill, differences)
}

cpp_is_whole_num <- function(x, tol, na_rm) {
  .Call(`_timeplyr_cpp_is_whole_num`, x, tol, na_rm)
}

cpp_roll_na_fill <- function(x, fill_limit) {
  .Call(`_timeplyr_cpp_roll_na_fill`, x, fill_limit)
}

cpp_roll_na_fill_grouped <- function(x, o, sizes, fill_limit) {
  .Call(`_timeplyr_cpp_roll_na_fill_grouped`, x, o, sizes, fill_limit)
}

cpp_roll_count_na <- function(x, window, invert, partial) {
  .Call(`_timeplyr_cpp_roll_count_na`, x, window, invert, partial)
}

cpp_roll_growth_rate <- function(x, lag, log) {
  .Call(`_timeplyr_cpp_roll_growth_rate`, x, lag, log)
}

cpp_row_id <- function(order, group_sizes, ascending) {
  .Call(`_timeplyr_cpp_row_id`, order, group_sizes, ascending)
}

cpp_vector_size <- function(x) {
  .Call(`_timeplyr_cpp_vector_size`, x)
}

cpp_list_which_not_null <- function(l) {
  .Call(`_timeplyr_cpp_list_which_not_null`, l)
}

list_has_interval <- function(l) {
  .Call(`_timeplyr_list_has_interval`, l)
}

list_item_is_interval <- function(l) {
  .Call(`_timeplyr_list_item_is_interval`, l)
}

cpp_sorted_group_starts <- function(group_sizes, init_loc) {
  .Call(`_timeplyr_cpp_sorted_group_starts`, group_sizes, init_loc)
}

roll_time_threshold <- function(x, threshold, switch_on_boundary) {
  .Call(`_timeplyr_roll_time_threshold`, x, threshold, switch_on_boundary)
}

cpp_df_group_indices <- function(rows, size) {
  .Call(`_timeplyr_cpp_df_group_indices`, rows, size)
}

cpp_r_obj_address <- function(x) {
  .Call(`_timeplyr_cpp_r_obj_address`, x)
}

cpp_bin <- function(x, breaks, codes, right, include_lowest, include_oob) {
  .Call(`_timeplyr_cpp_bin`, x, breaks, codes, right, include_lowest, include_oob)
}

cpp_bin_grouped <- function(x, y, codes, right, include_lowest, include_oob) {
  .Call(`_timeplyr_cpp_bin_grouped`, x, y, codes, right, include_lowest, include_oob)
}

cpp_list_subset <- function(x, ptype, i, default_value) {
  .Call(`_timeplyr_cpp_list_subset`, x, ptype, i, default_value)
}

cpp_nrows <- function(x) {
  .Call(`_timeplyr_cpp_nrows`, x)
}

cpp_address_equal <- function(x, y) {
  .Call(`_timeplyr_cpp_address_equal`, x, y)
}

cpp_copy <- function(x) {
  .Call(`_timeplyr_cpp_copy`, x)
}

cpp_consecutive_na_id <- function(x, left_to_right) {
  .Call(`_timeplyr_cpp_consecutive_na_id`, x, left_to_right)
}

cpp_which_first_gap <- function(x, increment, left_to_right) {
  .Call(`_timeplyr_cpp_which_first_gap`, x, increment, left_to_right)
}

cpp_group_locs <- function(order, group_sizes) {
  .Call(`_timeplyr_cpp_group_locs`, order, group_sizes)
}