png("mygraph.png") par(mar = c(15, 4, .5, .5)) barplot(setNames(dat$number, dat$name), las = 2) dev.off()
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.