R/map.R

Defines functions map_integer map_character

#' Wrapper for vapply
#'
#' @param values An iterable object
#' @param f A function returning scalar character
#' @param ... Further arguments for vapply
#'
#' @noRd
map_character <- function(values, f = as.character, ...)
{
  vapply(values, f, character(1), ...)
}

#' Wrapper for vapply
#'
#' @param values An iterable object
#' @param f A function returning scalar integer
#' @param ... Further arguments for vapply
#'
#' @noRd
map_integer <- function(values, f = as.integer, ...)
{
  vapply(values, f, integer(1), ...)
}
smbache/squr documentation built on May 15, 2021, 3:45 a.m.