library(VennDetail)
context("venndetail")
A <- sample(1:100, 40, replace = FALSE)
B <- sample(1:100, 60, replace = FALSE)
C <- sample(1:100, 40, replace = FALSE)
expect_silent(res<-venndetail(list(A = A,B = B,C = C)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.