data-raw/mthds/exhibit.R

exhibit.ready4use_dictionary <- function(x,
                                         caption_1L_chr = NULL,
                                         mkdn_tbl_ref_1L_chr = NULL,
                                         output_type_1L_chr = "HTML",
                                         use_lbls_as_col_nms_1L_lgl = T){
  var_desc_chr = c("Variable","Category","Description","Class")
  x %>%
    print_from_chunk(caption_1L_chr = caption_1L_chr,
                     mkdn_tbl_ref_1L_chr = mkdn_tbl_ref_1L_chr,
                     output_type_1L_chr = output_type_1L_chr,
                     use_lbls_as_col_nms_1L_lgl = use_lbls_as_col_nms_1L_lgl,
                     var_desc_chr = var_desc_chr)
}
ready4-dev/ready4use documentation built on June 1, 2025, 2:06 p.m.