Vectorize calculate.sample/ratio.pvalue()

Improve performance of `calculate.sample/ratio.pvalue()` by vectorizing calls to `pnorm()` and `distr::p()`