Если вы посмотрите на значения, возвращаемые вызовом функции fisher.test()
(см. help(fisher.test)
в R), вы заметите, что среди других есть p.value
.Так что вам просто нужно использовать $p.value
на вашем объекте R.Вот пример, в R:
tab <- replicate(2, sample(LETTERS[1:3], 10, rep=TRUE))
fisher.test(table(tab[,1], tab[,2]))$p.value