Set an APA-like theme for gtsummary tables, i.e. means and standard
deviations with two decimals are calculated for continuous variables, the
Welch test (as the default t.test function in R calculates a Welch test) is
the default statistical test for a two group comparison, and the method for
correcting p-values is the false discovery rate correction.
Examples
library(gtsummary)
theme_gtsummary_apa()
#> Setting theme `APA`
trial %>%
select(trt, age, response, ttdeath) %>%
tbl_summary(by = trt) %>%
add_n() %>%
add_p() %>%
add_q(quiet = TRUE)
#> <div id="vncsfqscct" style="padding-left:0px;padding-right:0px;padding-top:10px;padding-bottom:10px;overflow-x:auto;overflow-y:auto;width:auto;height:auto;">
#> <style>html {
#> font-family: -apple-system, BlinkMacSystemFont, 'Segoe UI', Roboto, Oxygen, Ubuntu, Cantarell, 'Helvetica Neue', 'Fira Sans', 'Droid Sans', Arial, sans-serif;
#> }
#>
#> #vncsfqscct .gt_table {
#> display: table;
#> border-collapse: collapse;
#> margin-left: auto;
#> margin-right: auto;
#> color: #333333;
#> font-size: 16px;
#> font-weight: normal;
#> font-style: normal;
#> background-color: #FFFFFF;
#> width: auto;
#> border-top-style: solid;
#> border-top-width: 2px;
#> border-top-color: #A8A8A8;
#> border-right-style: none;
#> border-right-width: 2px;
#> border-right-color: #D3D3D3;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #A8A8A8;
#> border-left-style: none;
#> border-left-width: 2px;
#> border-left-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_heading {
#> background-color: #FFFFFF;
#> text-align: center;
#> border-bottom-color: #FFFFFF;
#> border-left-style: none;
#> border-left-width: 1px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 1px;
#> border-right-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_caption {
#> padding-top: 4px;
#> padding-bottom: 4px;
#> }
#>
#> #vncsfqscct .gt_title {
#> color: #333333;
#> font-size: 125%;
#> font-weight: initial;
#> padding-top: 4px;
#> padding-bottom: 4px;
#> padding-left: 5px;
#> padding-right: 5px;
#> border-bottom-color: #FFFFFF;
#> border-bottom-width: 0;
#> }
#>
#> #vncsfqscct .gt_subtitle {
#> color: #333333;
#> font-size: 85%;
#> font-weight: initial;
#> padding-top: 0;
#> padding-bottom: 6px;
#> padding-left: 5px;
#> padding-right: 5px;
#> border-top-color: #FFFFFF;
#> border-top-width: 0;
#> }
#>
#> #vncsfqscct .gt_bottom_border {
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_col_headings {
#> border-top-style: solid;
#> border-top-width: 2px;
#> border-top-color: #D3D3D3;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> border-left-style: none;
#> border-left-width: 1px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 1px;
#> border-right-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_col_heading {
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: normal;
#> text-transform: inherit;
#> border-left-style: none;
#> border-left-width: 1px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 1px;
#> border-right-color: #D3D3D3;
#> vertical-align: bottom;
#> padding-top: 5px;
#> padding-bottom: 6px;
#> padding-left: 5px;
#> padding-right: 5px;
#> overflow-x: hidden;
#> }
#>
#> #vncsfqscct .gt_column_spanner_outer {
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: normal;
#> text-transform: inherit;
#> padding-top: 0;
#> padding-bottom: 0;
#> padding-left: 4px;
#> padding-right: 4px;
#> }
#>
#> #vncsfqscct .gt_column_spanner_outer:first-child {
#> padding-left: 0;
#> }
#>
#> #vncsfqscct .gt_column_spanner_outer:last-child {
#> padding-right: 0;
#> }
#>
#> #vncsfqscct .gt_column_spanner {
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> vertical-align: bottom;
#> padding-top: 5px;
#> padding-bottom: 5px;
#> overflow-x: hidden;
#> display: inline-block;
#> width: 100%;
#> }
#>
#> #vncsfqscct .gt_group_heading {
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: initial;
#> text-transform: inherit;
#> border-top-style: solid;
#> border-top-width: 2px;
#> border-top-color: #D3D3D3;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> border-left-style: none;
#> border-left-width: 1px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 1px;
#> border-right-color: #D3D3D3;
#> vertical-align: middle;
#> text-align: left;
#> }
#>
#> #vncsfqscct .gt_empty_group_heading {
#> padding: 0.5px;
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: initial;
#> border-top-style: solid;
#> border-top-width: 2px;
#> border-top-color: #D3D3D3;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> vertical-align: middle;
#> }
#>
#> #vncsfqscct .gt_from_md > :first-child {
#> margin-top: 0;
#> }
#>
#> #vncsfqscct .gt_from_md > :last-child {
#> margin-bottom: 0;
#> }
#>
#> #vncsfqscct .gt_row {
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> margin: 10px;
#> border-top-style: solid;
#> border-top-width: 1px;
#> border-top-color: #D3D3D3;
#> border-left-style: none;
#> border-left-width: 1px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 1px;
#> border-right-color: #D3D3D3;
#> vertical-align: middle;
#> overflow-x: hidden;
#> }
#>
#> #vncsfqscct .gt_stub {
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: initial;
#> text-transform: inherit;
#> border-right-style: solid;
#> border-right-width: 2px;
#> border-right-color: #D3D3D3;
#> padding-left: 5px;
#> padding-right: 5px;
#> }
#>
#> #vncsfqscct .gt_stub_row_group {
#> color: #333333;
#> background-color: #FFFFFF;
#> font-size: 100%;
#> font-weight: initial;
#> text-transform: inherit;
#> border-right-style: solid;
#> border-right-width: 2px;
#> border-right-color: #D3D3D3;
#> padding-left: 5px;
#> padding-right: 5px;
#> vertical-align: top;
#> }
#>
#> #vncsfqscct .gt_row_group_first td {
#> border-top-width: 2px;
#> }
#>
#> #vncsfqscct .gt_summary_row {
#> color: #333333;
#> background-color: #FFFFFF;
#> text-transform: inherit;
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> }
#>
#> #vncsfqscct .gt_first_summary_row {
#> border-top-style: solid;
#> border-top-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_first_summary_row.thick {
#> border-top-width: 2px;
#> }
#>
#> #vncsfqscct .gt_last_summary_row {
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_grand_summary_row {
#> color: #333333;
#> background-color: #FFFFFF;
#> text-transform: inherit;
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> }
#>
#> #vncsfqscct .gt_first_grand_summary_row {
#> padding-top: 8px;
#> padding-bottom: 8px;
#> padding-left: 5px;
#> padding-right: 5px;
#> border-top-style: double;
#> border-top-width: 6px;
#> border-top-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_striped {
#> background-color: rgba(128, 128, 128, 0.05);
#> }
#>
#> #vncsfqscct .gt_table_body {
#> border-top-style: solid;
#> border-top-width: 2px;
#> border-top-color: #D3D3D3;
#> border-bottom-style: solid;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_footnotes {
#> color: #333333;
#> background-color: #FFFFFF;
#> border-bottom-style: none;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> border-left-style: none;
#> border-left-width: 2px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 2px;
#> border-right-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_footnote {
#> margin: 0px;
#> font-size: 90%;
#> padding-left: 4px;
#> padding-right: 4px;
#> padding-left: 5px;
#> padding-right: 5px;
#> }
#>
#> #vncsfqscct .gt_sourcenotes {
#> color: #333333;
#> background-color: #FFFFFF;
#> border-bottom-style: none;
#> border-bottom-width: 2px;
#> border-bottom-color: #D3D3D3;
#> border-left-style: none;
#> border-left-width: 2px;
#> border-left-color: #D3D3D3;
#> border-right-style: none;
#> border-right-width: 2px;
#> border-right-color: #D3D3D3;
#> }
#>
#> #vncsfqscct .gt_sourcenote {
#> font-size: 90%;
#> padding-top: 4px;
#> padding-bottom: 4px;
#> padding-left: 5px;
#> padding-right: 5px;
#> }
#>
#> #vncsfqscct .gt_left {
#> text-align: left;
#> }
#>
#> #vncsfqscct .gt_center {
#> text-align: center;
#> }
#>
#> #vncsfqscct .gt_right {
#> text-align: right;
#> font-variant-numeric: tabular-nums;
#> }
#>
#> #vncsfqscct .gt_font_normal {
#> font-weight: normal;
#> }
#>
#> #vncsfqscct .gt_font_bold {
#> font-weight: bold;
#> }
#>
#> #vncsfqscct .gt_font_italic {
#> font-style: italic;
#> }
#>
#> #vncsfqscct .gt_super {
#> font-size: 65%;
#> }
#>
#> #vncsfqscct .gt_footnote_marks {
#> font-style: italic;
#> font-weight: normal;
#> font-size: 75%;
#> vertical-align: 0.4em;
#> }
#>
#> #vncsfqscct .gt_asterisk {
#> font-size: 100%;
#> vertical-align: 0;
#> }
#>
#> #vncsfqscct .gt_indent_1 {
#> text-indent: 5px;
#> }
#>
#> #vncsfqscct .gt_indent_2 {
#> text-indent: 10px;
#> }
#>
#> #vncsfqscct .gt_indent_3 {
#> text-indent: 15px;
#> }
#>
#> #vncsfqscct .gt_indent_4 {
#> text-indent: 20px;
#> }
#>
#> #vncsfqscct .gt_indent_5 {
#> text-indent: 25px;
#> }
#> </style>
#> <table class="gt_table">
#>
#> <thead class="gt_col_headings">
#> <tr>
#> <th class="gt_col_heading gt_columns_bottom_border gt_left" rowspan="1" colspan="1" scope="col" id="<strong>Characteristic</strong>"><strong>Characteristic</strong></th>
#> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1" scope="col" id="<strong>N</strong>"><strong>N</strong></th>
#> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1" scope="col" id="<strong>Drug A</strong>, N = 98<sup class="gt_footnote_marks">1</sup>"><strong>Drug A</strong>, N = 98<sup class="gt_footnote_marks">1</sup></th>
#> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1" scope="col" id="<strong>Drug B</strong>, N = 102<sup class="gt_footnote_marks">1</sup>"><strong>Drug B</strong>, N = 102<sup class="gt_footnote_marks">1</sup></th>
#> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1" scope="col" id="<strong>p-value</strong><sup class="gt_footnote_marks">2</sup>"><strong>p-value</strong><sup class="gt_footnote_marks">2</sup></th>
#> <th class="gt_col_heading gt_columns_bottom_border gt_center" rowspan="1" colspan="1" scope="col" id="<strong>q-value</strong><sup class="gt_footnote_marks">3</sup>"><strong>q-value</strong><sup class="gt_footnote_marks">3</sup></th>
#> </tr>
#> </thead>
#> <tbody class="gt_table_body">
#> <tr><td headers="label" class="gt_row gt_left">Age</td>
#> <td headers="n" class="gt_row gt_center">189</td>
#> <td headers="stat_1" class="gt_row gt_center">47.01 (14.71)</td>
#> <td headers="stat_2" class="gt_row gt_center">47.45 (14.01)</td>
#> <td headers="p.value" class="gt_row gt_center">0.8</td>
#> <td headers="q.value" class="gt_row gt_center">0.8</td></tr>
#> <tr><td headers="label" class="gt_row gt_left">Tumor Response</td>
#> <td headers="n" class="gt_row gt_center">193</td>
#> <td headers="stat_1" class="gt_row gt_center">28 (29%)</td>
#> <td headers="stat_2" class="gt_row gt_center">33 (34%)</td>
#> <td headers="p.value" class="gt_row gt_center">0.5</td>
#> <td headers="q.value" class="gt_row gt_center">0.8</td></tr>
#> <tr><td headers="label" class="gt_row gt_left">Months to Death/Censor</td>
#> <td headers="n" class="gt_row gt_center">200</td>
#> <td headers="stat_1" class="gt_row gt_center">20.23 (4.99)</td>
#> <td headers="stat_2" class="gt_row gt_center">19.04 (5.50)</td>
#> <td headers="p.value" class="gt_row gt_center">0.11</td>
#> <td headers="q.value" class="gt_row gt_center">0.3</td></tr>
#> </tbody>
#>
#> <tfoot class="gt_footnotes">
#> <tr>
#> <td class="gt_footnote" colspan="6"><sup class="gt_footnote_marks">1</sup> Mean (SD); n (%)</td>
#> </tr>
#> <tr>
#> <td class="gt_footnote" colspan="6"><sup class="gt_footnote_marks">2</sup> Welch Two Sample t-test; Pearson's Chi-squared test</td>
#> </tr>
#> <tr>
#> <td class="gt_footnote" colspan="6"><sup class="gt_footnote_marks">3</sup> False discovery rate correction for multiple testing</td>
#> </tr>
#> </tfoot>
#> </table>
#> </div>