R/bucket_count.R

In cppcontainers: 'C++' Standard Template Library Containers

#' Get the number of buckets
#' 
#' Obtain the container's number of buckets.
#' 
#' @param x A CppUnorderedSet, CppUnorderedMultiset, CppUnorderedMap, CppUnorderedMultimap object.
#' 
#' @returns Returns the container's number of buckets.
#' 
#' @seealso \link{max_bucket_count}, \link{load_factor}, \link{size}.
#' 
#' @examples
#' s <- cpp_unordered_set(6:10)
#' s
#' # 10 9 8 7 6
#' 
#' bucket_count(s)
#' # [1] 13
#' 

#' @aliases bucket_count,CppUnorderedSet-method bucket_count,CppUnorderedMultiset-method bucket_count,CppUnorderedMap-method 
#' bucket_count,CppUnorderedMultimap-method

#' @export
methods::setGeneric("bucket_count", function(x) standardGeneric("bucket_count"))

#' @include classes.R

#' @export
methods::setMethod("bucket_count", methods::signature(x = "CppUnorderedSet"), function(x) {
  return(switch(x@type,
    integer = unordered_set_bucket_count_i(x@pointer),
    double = unordered_set_bucket_count_d(x@pointer),
    string = unordered_set_bucket_count_s(x@pointer),
    boolean = unordered_set_bucket_count_b(x@pointer)
  ))
})

#' @export
methods::setMethod("bucket_count", methods::signature(x = "CppUnorderedMultiset"), function(x) {
  return(switch(x@type,
    integer = unordered_multiset_bucket_count_i(x@pointer),
    double = unordered_multiset_bucket_count_d(x@pointer),
    string = unordered_multiset_bucket_count_s(x@pointer),
    boolean = unordered_multiset_bucket_count_b(x@pointer)
  ))
})

#' @export
methods::setMethod("bucket_count", methods::signature(x = "CppUnorderedMap"), function(x) {
  return(switch(x@key_type,
    integer = switch(x@value_type,
      integer = unordered_map_bucket_count_i_i(x@pointer),
      double = unordered_map_bucket_count_i_d(x@pointer),
      string = unordered_map_bucket_count_i_s(x@pointer),
      boolean = unordered_map_bucket_count_i_b(x@pointer)),
    double = switch(x@value_type,
      integer = unordered_map_bucket_count_d_i(x@pointer),
      double = unordered_map_bucket_count_d_d(x@pointer),
      string = unordered_map_bucket_count_d_s(x@pointer),
      boolean = unordered_map_bucket_count_d_b(x@pointer)),
    string = switch(x@value_type,
      integer = unordered_map_bucket_count_s_i(x@pointer),
      double = unordered_map_bucket_count_s_d(x@pointer),
      string = unordered_map_bucket_count_s_s(x@pointer),
      boolean = unordered_map_bucket_count_s_b(x@pointer)),
    boolean = switch(x@value_type,
      integer = unordered_map_bucket_count_b_i(x@pointer),
      double = unordered_map_bucket_count_b_d(x@pointer),
      string = unordered_map_bucket_count_b_s(x@pointer),
      boolean = unordered_map_bucket_count_b_b(x@pointer))
  ))
})

#' @export
methods::setMethod("bucket_count", methods::signature(x = "CppUnorderedMultimap"), function(x) {
  return(switch(x@key_type,
    integer = switch(x@value_type,
      integer = unordered_multimap_bucket_count_i_i(x@pointer),
      double = unordered_multimap_bucket_count_i_d(x@pointer),
      string = unordered_multimap_bucket_count_i_s(x@pointer),
      boolean = unordered_multimap_bucket_count_i_b(x@pointer)),
    double = switch(x@value_type,
      integer = unordered_multimap_bucket_count_d_i(x@pointer),
      double = unordered_multimap_bucket_count_d_d(x@pointer),
      string = unordered_multimap_bucket_count_d_s(x@pointer),
      boolean = unordered_multimap_bucket_count_d_b(x@pointer)),
    string = switch(x@value_type,
      integer = unordered_multimap_bucket_count_s_i(x@pointer),
      double = unordered_multimap_bucket_count_s_d(x@pointer),
      string = unordered_multimap_bucket_count_s_s(x@pointer),
      boolean = unordered_multimap_bucket_count_s_b(x@pointer)),
    boolean = switch(x@value_type,
      integer = unordered_multimap_bucket_count_b_i(x@pointer),
      double = unordered_multimap_bucket_count_b_d(x@pointer),
      string = unordered_multimap_bucket_count_b_s(x@pointer),
      boolean = unordered_multimap_bucket_count_b_b(x@pointer))
  ))
})