R/phist.R

Defines functions phist

phist<-function(x, z, pz){
  z<-c(-exp(100), z, exp(100))
  pz<-c(0, pz, 1)
  approx(z, pz, x)$y
}

Try the SHELF package in your browser

Any scripts or data that you put into this service are public.

SHELF documentation built on June 7, 2023, 5:11 p.m.