Sometimes R built-in statistical test functions such as cor.test report a p-value of 0, which makes me wonder the smallest p-value that can precisely be returned by these functions. I think this should be smaller that 1e-21, because I've seen something around 3e-21 returned.