knitr::opts_chunk$set(echo = TRUE) library(gt)
Create a display table based on airquality
.
gt(airquality) %>% cols_move_to_start(columns = c(Month, Day)) %>% cols_label(Solar.R = html("Solar<br>Radiation")) %>% fmt_number( columns = Wind, decimals = 2 ) %>% tab_spanner( label = "Measurement Period", columns = c(Month, Day) ) %>% sub_missing(columns = c(Ozone, Solar.R, Wind, Temp))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.