#' Map given function, handle null as NA and flatten_chr()
#'
#' \lifecycle{deprecated}
#'
#' @details Use this function to extract elements with NAs from a list of lists
#' into a tibble.
#'
#' @param .x An interable data object
#' @param .f A function to map over the data
#' @param ... Extra arguments to `map()`
#' @author Jennifer Bryan https://github.com/jennybc/
#' @export
#' @family helpers
map_chr_hack <- function(.x, .f, ...) {
purrr::map(.x, .f, ...) %>%
purrr::map_if(is.null, ~NA_character_) %>%
purrr::flatten_chr()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.