library(Vennerable)
setList <- strsplit(month.name,split="")
names(setList) <- month.name
Vempty2 <- VennFromSets( setList[c(4,5,11)])
TAMN <- compute.Venn(Vempty2)
Vennerable:::.validateDrawing(TAMN )
#grid.newpage();plot(TAMN )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.