A Demonstration of Showing mtable results in HTML Format

First, we load the package and estimate some regression models.

library(memisc)
lm0 <- lm(sr ~ pop15 + pop75,              data = LifeCycleSavings)
lm1 <- lm(sr ~                 dpi + ddpi, data = LifeCycleSavings)
lm2 <- lm(sr ~ pop15 + pop75 + dpi + ddpi, data = LifeCycleSavings)

Next, we put them together into a table with mtable().

mtable123 <- mtable("Model 1"=lm0,"Model 2"=lm1,"Model 3"=lm2,
                    summary.stats=c("sigma","R-squared","F","p","N"))

Third, we improve the appearance of the results by relabeling the mtable object.

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"
)

Finally we view the results in HTML format.

show_html(mtable123)
Model 1Model 2Model 3
Constant30.628***6.360***28.566***
(7.409)(1.252)(7.355)
Percentage of population under 15−0.471**−0.461**
(0.147)(0.145)
Percentage of population over 75−1.934−1.691
(1.041)(1.084)
Real per-capita disposable income0.001−0.000
(0.001)(0.001)
Growth rate of real per-capita disp. income0.529*0.410*
(0.210)(0.196)
sigma3.94.23.8
R-squared0.30.20.3
F8.34.55.8
p0.00.00.0
N505050

The results can be written into an HTML file using write_html(mtable123,file="mtable123.html") or the like. MS Word or LibreOffice can import such a file. An example HTML file can be found here. The file in docx format can be found here and here in open document format (odt).[1]

[1]: Unfortunately, LibreOffice currently seems to do a less than perfect job in importing HTML tables. The columns are a bit too wide and need to be adjusted by hand as do the skips after paragraphs. The example you find at the link mentioned above is thus manually adjusted.