gt_tbl <- gt::exibble|> gt::gt()
gt_group <- gt::gt_group(gt_tbl, gt_tbl)
func <- gt::tab_options
arg_list_group <- list(page.header.use_tbl_headings = c(TRUE))
apply_to_gt_group(gt_group, func,arg_list_group)
Run the code above in your browser using DataLab