knitr::opts_chunk$set(echo = TRUE)
library(huxtable) library(tidyverse) lm1 <- lm(data = cars, formula = dist ~ speed) huxreg(lm1, lm1, lm1, lm1, lm1, lm1, lm1, lm1) %>% set_position("left")
Trying to adjust size: --> does not work
huxreg(lm1, lm1, lm1, lm1, lm1, lm1, lm1, lm1) %>% set_width(.5) %>% set_position("left")
Trying to center so excess is on both sides equally. --> also does not work
huxreg(lm1, lm1, lm1, lm1, lm1, lm1, lm1, lm1) %>% set_width(.5) %>% set_position("center")
This works but is tideous:
r
huxreg(lm1, lm1, lm1, lm1, lm1, lm1, lm1, lm1) %>%
set_font_size(5) %>%
set_position("left")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.