`barnardw.test` <- function(n1,n2,n3,n4,dp=0.001) { return(barnard.test(n1,n2,n3,n4,dp=dp,pooled=TRUE)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.