ghr <- list(
n = c("Ap",
"A",
"BE",
"Bt",
"2Bt",
"Btg",
"BCt",
"Cd",
"missing"),
p = c("Ap|AP|A p",
"A1|A2",
"BE|^E|1E",
"^Bt1|^Bt2|^Bt3|^B t",
"2Bt|2B t",
"Btg|Bg|BCg|Cg",
"^BC$|BCt",
"Cd|BCd",
"missing")
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.