Nothing
prop.test(9458, 10000, p = .95, correct = FALSE) %>% pval()
prop.test(9457, 10000, p = .95, correct = FALSE) %>% pval()
prop.test(9458, 10000, p = .95) %>% pval()
prop.test(9457, 10000, p = .95) %>% pval()
prop.test(9456, 10000, p = .95) %>% pval()
binom.test(9457, 10000, p = .95) %>% pval()
binom.test(9456, 10000, p = .95) %>% pval()
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.