R/rhoFxn.EXVAR.R

`rhoFxn.EXVAR` <-
function(mu0, z, lam, timelow, timehigh){
	((mu0*timehigh) + ((mu0/z)*exp(-z*timehigh)) - lam*timehigh - (mu0*timelow) - ((mu0/z)*exp(-z*timelow)) + lam*timelow );
}

Try the laser package in your browser

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

laser documentation built on Jan. 15, 2017, 4:49 p.m.