Почти правильно. Если вы посмотрите на ?phyper
:
phyper(q, m, n, k, lower.tail = TRUE, log.p = FALSE)
x, q vector of quantiles representing the number of white balls drawn
without replacement from an urn which contains both black and white
balls.
m the number of white balls in the urn.
n the number of black balls in the urn.
k the number of balls drawn from the urn.
Итак, используя ваши данные:
phyper(62,1998,5260-1998,131)
[1] 0.989247