R/plgamma3.R

Defines functions plgamma3

Documented in plgamma3

plgamma3 <-
function(q,shape=1,scale=1,thres=1,lower.tail=TRUE,log.p=FALSE)
{
	Fx <- pgamma3(log(q),shape,1/scale,thres)
	if(!lower.tail) Fx <- 1 - Fx
	if(log.p) Fx <- log(Fx)
	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.