pbivnorm
is an R package containing a vectorized function to compute the bivariate normal CDF. It is based on the mnormt
package by Adelchi Azzalini, which uses Fortran code by Alan Genz to compute integrals of multivariate normal densities.
A call to pbivnorm()
produces identical output to a corresponding set of calls to mnormt::pmnorm()
, but at lower computational cost due to vectorization (i.e., looping in Fortran rather than in R).
R> library("pbivnorm")
R> library("mnormt")
R> set.seed(9497)
R> x1 <- rnorm(10)
R> x2 <- rnorm(10)
R> X <- cbind(x1, x2)
R> all.equal(pbivnorm(X), apply(X, 1, pmnorm, mean = c(0, 0), varcov = diag(2)))
## [1] TRUE
R> library("microbenchmark")
R> microbenchmark(pbivnorm = pbivnorm(X),
mnormt = apply(X, 1, pmnorm, mean = c(0, 0), varcov = diag(2)))
## Unit: microseconds
## expr min lq median uq max neval
## pbivnorm 59.373 61.851 66.987 73.373 140.38 100
## mnormt 1052.671 1074.699 1091.472 1120.907 2283.88 100