library(devtools)
library(tidyverse)
library(fs)
(a <- factor(c("character", "hits", "your", "eyeballs")))
#> [1] character hits your eyeballs
#> Levels: character eyeballs hits your
(b <- factor(c("but", "integer", "where it", "counts")))
#> [1] but integer where it counts
#> Levels: but counts integer where it
c(a, b)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.