Skip to content

Instantly share code, notes, and snippets.

@jtleek
jtleek / gist:4177366
Created November 30, 2012 17:56
Bonferroni Correcting Autism P-values
pvaluesPain = c(0.02, 0.06, 0.75, 0.38, 0.3, 0.07, 0.22, 0.27)
adjustedPvaluesPain = p.adjust(pvaluesPain,method="bonferroni")
adjustedPvaluesPain
sum(adjustedPvaluesPain < 0.05)
pvaluesNoPain = c(0.82, 0.98, 0.65, 0.39, 0.88, 0.95, 0.29, 0.64, 0.81)
adjustedPvaluesNoPain = p.adjust(pvaluesNoPain,method="bonferroni")
adjustedPvaluesNoPain
sum(adjustedPvaluesNoPain < 0.05)