https://github.com/cran/mvtnorm
Raw File
Tip revision: 23288576d6ef395eeafaf18e196155edee4d46d0 authored by Torsten Hothorn on 17 January 2014, 00:00:00 UTC
version 0.9-9997
Tip revision: 2328857
tvpackAux.c
#include<R.h>
#include<Rmath.h>

double F77_SUB(phid)(double *x){
  return pnorm(*x, 0.0, 1.0, 1, 0);
}

double F77_SUB(studnt)(int *nu, double *x){
  return pt(*x, *nu, 1, 0);
}
back to top