HTML Formatting for 'mtable' Results
These functions formats 'mtable' objects into HTML format.
mtable_format_html(x,
interaction.sep = NULL,
toprule=2,midrule=1,bottomrule=2,
split.dec=TRUE,
style=mtable_format_stdstyle,
margin="2ex auto",
sig.notes.style=c(width="inherit"),
...
)
## S3 method for class 'memisc_mtable'
format_html(x,
interaction.sep = NULL,
toprule=2,midrule=1,bottomrule=2,
split.dec=TRUE,
style=mtable_format_stdstyle,
margin="2ex auto",
sig.notes.style=c(width="inherit"),
...
)x |
an object of class |
toprule |
integer; thickness in pixels of rule at the top of the table. |
midrule |
integer; thickness in pixels of rules within the table. |
bottomrule |
integer; thickness in pixels of rule at the bottom of the table. |
interaction.sep |
a character string that separates factors that are involved in an interaction effect or NULL. If NULL then a reasonable default is used (either a unicode character or an ampersand encoded HTML entity). |
split.dec |
logical; whether numbers should be centered at the decimal point by splitting the table cells. |
style |
string containing default the CSS styling. |
margin |
character string, determines the margin and thus the position of the HTML table. |
sig.notes.style |
a character vector with named elements, allows extra styling of the p-values notes at the bottom of the table. |
... |
further arguments, ignored. |
A character string with code suitable for inclusion into a HTML-file.
lm0 <- lm(sr ~ pop15 + pop75, data = LifeCycleSavings)
lm1 <- lm(sr ~ dpi + ddpi, data = LifeCycleSavings)
lm2 <- lm(sr ~ pop15 + pop75 + dpi + ddpi, data = LifeCycleSavings)
mtable123 <- mtable("Model 1"=lm0,"Model 2"=lm1,"Model 3"=lm2,
summary.stats=c("sigma","R-squared","F","p","N"))
(mtable123 <- relabel(mtable123,
"(Intercept)" = "Constant",
pop15 = "Percentage of population under 15",
pop75 = "Percentage of population over 75",
dpi = "Real per-capita disposable income",
ddpi = "Growth rate of real per-capita disp. income"
))
# Use HTML entity '−' for minus sign
options(html.use.ampersand=TRUE)
show_html(mtable123)
show_html(mtable123[1:2],
sig.notes.style=c(width="30ex"))
# Use unicode for minus sign (default)
options(html.use.ampersand=FALSE)
show_html(mtable123)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.