Nothing
#Testing using package testthat for detailed error messages
library(testthat)
#Suppress plotting for sanity
options(device = pdf());
test_that(
'Disabled log file export', {
disabled.output <- capture_output(
venn.diagram(
list(A = 1:20, B = 11:30),
filename = NULL,
disable.logging = TRUE
)
);
expect_gt(nchar(disabled.output), 0);
}
);
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.