library(Reg)
a <- factor(c("character", "hits", "your", "eyeballs"))
b <- factor(c("but", "integer", "where it", "counts"))
fbind(a, b)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.