Nothing
d <- cbind(c(9,13),c(14,9)); d
fisher.test(d)
phyper(9,23,22,22)
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.