knitr::opts_chunk$set(echo = TRUE) library(gt)
Create a display table based on morley
Michelson Speed of Light Data
gt(morley %>% dplyr::mutate(Speed = as.numeric(Speed))) %>% fmt_number( columns = Speed, decimals = 0, sep_mark = "," ) %>% cols_align(align = "left", columns = c(Run, Speed))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.