All tab_*-functions create a HTML page with the table
output. This table, by default, is opened in the viewer pane of your IDE
(in case you’re using an IDE that also supports the viewer pane). If a
viewer pane is not available, the created HTML output is saved as
temporary file and opened in your default web browser. The temporary
files are deleted after your R session ends.
You can save the HTML page as file for further usage by specifying
the file-argument The saved HTML file can be opened by word
processors like LibreOffice or Microsoft Office.
You can directly drag and drop a table from the RStudio viewer pane or browser into your word processor. Simply select the complete table with your mouse and drag it into office.
The table output is in in HTML format. The table style (visual appearance) is formatted using Cascading Style Sheets (CSS). If you are a bit familiar with these topics, you can easily customize the appearance of the table output.
Many table elements (header, row, column, cell, summary row, first
row or column…) have CSS-class attributes, which can be used to change
the table style. Since each sjt.* function as well as
tab_model() has different table elements and thus different
class attributes, you first need to know which styles can be
customized.
The table functions invisibly return several values. The return value
page.style contains the style information for the HTML
table. You can print this style sheet to console using the
cat()-function:
library(sjPlot)
data(efc)
m <- lm(barthtot ~ c160age + c12hour + c161sex + c172code, data = efc)
tab <- tab_model(m)cat(tab$page.style)
#> <style>
#> html, body { background-color: white; }
#> table { border-collapse:collapse; border:none; }
#> caption { font-weight: bold; text-align:left; }
#> td { }
#> .thead { border-top: double; text-align:center; font-style:normal; font-weight:bold; padding:0.2cm; }
#> .tdata { padding:0.2cm; text-align:left; vertical-align:top; }
#> .arc { background-color:#f2f2f2; }
#> .summary { padding-top:0.1cm; padding-bottom:0.1cm; }
#> .summarydata { text-align:left; }
#> .fixedparts { font-weight:bold; text-align:left; }
#> .randomparts { font-weight:bold; text-align:left; padding-top:.8em; }
#> .zeroparts { font-weight:bold; text-align:left; padding-top:.8em; }
#> .simplexparts { font-weight:bold; text-align:left; padding-top:.8em; }
#> .lasttablerow { border-bottom: double; }
#> .firsttablerow { }
#> .firstsumrow { border-top:1px solid; }
#> .labelcellborder { border-bottom:1px solid; }
#> .depvarhead { text-align:center; border-bottom:1px solid; font-style:italic; font-weight:normal; }
#> .depvarheadnodv { border-top: double; text-align:center; border-bottom:1px solid; font-style:italic; font-weight:normal; }
#> .leftalign { text-align:left; }
#> .centeralign { text-align:center; }
#> .firsttablecol { text-align:left; }
#> .footnote { font-style:italic; border-top:double black; text-align:right; }
#> .subtitle { font-weight: normal; }
#> .modelcolumn1 { }
#> .modelcolumn2 { }
#> .modelcolumn3 { }
#> .modelcolumn4 { }
#> .modelcolumn5 { }
#> .modelcolumn6 { }
#> .modelcolumn7 { }
#> .col1 { }
#> .col2 { }
#> .col3 { }
#> .col4 { }
#> .col5 { }
#> .col6 { }
#> </style>The HTML code is in the page.content return value. The
following code prints the HTML code of the table to the R console:
cat(tab$page.content)
#> <table>
#> <tr>
#> <th class="thead firsttablerow firsttablecol col1"> </th>
#> <th colspan="3" class="thead firsttablerow">Total score BARTHEL INDEX</th>
#> </tr>
#> <tr>
#> <td class="depvarhead firsttablerow firsttablecol col1">Predictors</td>
#> <td class="depvarhead firsttablerow col2">Estimates</td>
#> <td class="depvarhead firsttablerow col3">CI</td>
#> <td class="depvarhead firsttablerow col4">p</td>
#> </tr>
#> <tr>
#> <td class="tdata firsttablecol col1">(Intercept)</td>
#> <td class="tdata centeralign modelcolumn1 col2">90.06</td>
#> <td class="tdata centeralign modelcolumn1 col3">77.95 – 102.18</td>
#> <td class="tdata centeralign modelcolumn1 col4"><strong><0.001</strong></td>
#> </tr>
#> <tr>
#> <td class="tdata firsttablecol col1">carer'age</td>
#> <td class="tdata centeralign modelcolumn1 col2">-0.22</td>
#> <td class="tdata centeralign modelcolumn1 col3">-0.36 – -0.08</td>
#> <td class="tdata centeralign modelcolumn1 col4"><strong>0.002</strong></td>
#> </tr>
#> <tr>
#> <td class="tdata firsttablecol col1">average number of hours<br>of care per week</td>
#> <td class="tdata centeralign modelcolumn1 col2">-0.28</td>
#> <td class="tdata centeralign modelcolumn1 col3">-0.31 – -0.24</td>
#> <td class="tdata centeralign modelcolumn1 col4"><strong><0.001</strong></td>
#> </tr>
#> <tr>
#> <td class="tdata firsttablecol col1">carer's gender</td>
#> <td class="tdata centeralign modelcolumn1 col2">-0.26</td>
#> <td class="tdata centeralign modelcolumn1 col3">-4.36 – 3.83</td>
#> <td class="tdata centeralign modelcolumn1 col4">0.900</td>
#> </tr>
#> <tr>
#> <td class="tdata firsttablecol col1">carer's level of<br>education</td>
#> <td class="tdata centeralign modelcolumn1 col2">-0.76</td>
#> <td class="tdata centeralign modelcolumn1 col3">-3.55 – 2.02</td>
#> <td class="tdata centeralign modelcolumn1 col4">0.592</td>
#> </tr>
#> <tr>
#> <td class="tdata leftalign summary firstsumrow">Observations</td>
#> <td class="tdata summary summarydata firstsumrow" colspan="3">821</td>
#> </tr>
#> <tr>
#> <td class="tdata leftalign summary">R<sup>2</sup> / R<sup>2</sup> adjusted</td>
#> <td class="tdata summary summarydata" colspan="3">0.270 / 0.266</td>
#> </tr>
#>
#> </table>Now you can see which table elements are associated with which CSS class attributes.
You can customize the table output with the CSS
parameter. This parameter requires a list of attributes, which follow a
certain pattern:
css. prefixcaption,
thead, centeralign, etc.)Example:
tab_model(
m,
CSS = list(
css.depvarhead = 'color: red;',
css.centeralign = 'text-align: left;',
css.firsttablecol = 'font-weight: bold;',
css.summary = 'color: blue;'
)
)| Total score BARTHEL INDEX | |||
|---|---|---|---|
| Predictors | Estimates | CI | p |
| (Intercept) | 90.06 | 77.95 – 102.18 | <0.001 |
| carer’age | -0.22 | -0.36 – -0.08 | 0.002 |
|
average number of hours of care per week |
-0.28 | -0.31 – -0.24 | <0.001 |
| carer’s gender | -0.26 | -4.36 – 3.83 | 0.900 |
|
carer’s level of education |
-0.76 | -3.55 – 2.02 | 0.592 |
| Observations | 821 | ||
| R2 / R2 adjusted | 0.270 / 0.266 | ||
In the above example, the header row lost the original style and just became red. If you want to keep the original style and just add additional style information, use the plus-sign (+) as initial character for the parameter attributes. In the following example, the header row keeps its original style and is additionally printed in red:
| Total score BARTHEL INDEX | |||
|---|---|---|---|
| Predictors | Estimates | CI | p |
| (Intercept) | 90.06 | 77.95 – 102.18 | <0.001 |
| carer’age | -0.22 | -0.36 – -0.08 | 0.002 |
|
average number of hours of care per week |
-0.28 | -0.31 – -0.24 | <0.001 |
| carer’s gender | -0.26 | -4.36 – 3.83 | 0.900 |
|
carer’s level of education |
-0.76 | -3.55 – 2.02 | 0.592 |
| Observations | 821 | ||
| R2 / R2 adjusted | 0.270 / 0.266 | ||
There are a few pre-defined CSS-themes, which can be accessed with
the css_theme()-function. There are more pre-defined themes
planned for the future.
| Total score BARTHEL INDEX | |||
|---|---|---|---|
| Predictors | Estimates | CI | p |
| (Intercept) | 90.06 | 77.95 – 102.18 | <0.001 |
| carer’age | -0.22 | -0.36 – -0.08 | 0.002 |
|
average number of hours of care per week |
-0.28 | -0.31 – -0.24 | <0.001 |
| carer’s gender | -0.26 | -4.36 – 3.83 | 0.900 |
|
carer’s level of education |
-0.76 | -3.55 – 2.02 | 0.592 |
| Observations | 821 | ||
| R2 / R2 adjusted | 0.270 / 0.266 | ||