In hughjonesd/huxtable: Easily Create and Style Tables for LaTeX, HTML and Other Formats

library(magrittr)
library(huxtable)
knitr::opts_chunk$set(echo = FALSE, message = FALSE, warning = FALSE)

lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw lorem upsdf usf ueriawo fsd urweia dsjkl ewauof dsnkfea uieorw

ht <- huxtable(a = "L L L L L L L left L L L L L L L", 
                         b = "R R R R R R R rght R R R R R R")

position(ht) <- "center"

ht <- set_all_borders(ht, 0.4)
caption(ht) <- "A caption"
wrap(ht) <- FALSE

ht
set_all_padding(ht, 8) %>% set_caption("padding 8")
set_all_padding(ht, 2) %>% set_caption("padding 2")

h2 <- huxreg(tmp <- lm(Sepal.Width ~ ., iris), tmp, tmp, tmp)
# width(h2) <- 0.5
position(h2) <- "right"
h2

\color{red}\rule{0.1\linewidth}{0.5pt}\color{blue}\rule{0.1\linewidth}{0.5pt}\color{red}\rule{0.1\linewidth}{0.5pt}\color{blue}\rule{0.1\linewidth}{0.5pt}\color{red}\rule{0.1\linewidth}{0.5pt}\color{blue}\rule{0.1\linewidth}{0.5pt}\color{red}\rule{0.1\linewidth}{0.5pt}\color{blue}\rule{0.1\linewidth}{0.5pt}\color{red}\rule{0.1\linewidth}{0.5pt}\color{blue}\rule{0.1\linewidth}{0.5pt}

hughjonesd/huxtable documentation built on Feb. 17, 2024, 12:20 a.m.