R/tidyHtmlTable_helpers_extractElementsAndConvertToTbl.R

In gforge/htmlTable: Advanced Tables for Markdown/HTML

#' Extract the elements and generate a table with unique elements
#'
#' @param x `list` with columns to be joined
#' @param elements `char` vector with the elements to select
prExtractElementsAndConvertToTbl <- function(x, elements) {
  x[elements] %>%
    prBindDataListIntoColumns() %>%
    dplyr::distinct()
}