R/pCMin.R

"pCMin" <-
function(theta,delta,s,t)
{if(missing(theta) | missing(delta)){theta<-1;delta<-1};
	pc<-pmax(0,(s+t-1));
	resu<-pc
}

Try the fgac package in your browser

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

fgac documentation built on May 2, 2019, 6:07 a.m.