R/dlgamma3.R

Defines functions dlgamma3

Documented in dlgamma3

dlgamma3 <-
function(x,shape=1,scale=1,thres=1,log=FALSE)
{
	fx <- dgamma3(log(x),shape,1/scale,thres)/x
	if(log) return(log(fx))
	else return(fx)
}

Try the FAdist package in your browser

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

FAdist documentation built on March 18, 2022, 5:24 p.m.