R画图时怎么让P值显示真实值而不是最小限制值2.2e-16？

发文章的时候reviewer，编辑提出，R的最小值不是2.2e-16这个R能显示的最小值

手动标志该值显示。在变量后面加上$p.value

> b=matrix(c(8269,10385,5091,10385),nrow=2)
> fisher.test(b)

	Fisher's Exact Test for Count Data

data:  b
p-value < 2.2e-16
alternative hypothesis: true odds ratio is not equal to 1
95 percent confidence interval:
 1.553506 1.698125
sample estimates:
odds ratio 
   1.62418 

> fisher.test(b)$p.value
[1] 1.603129e-103