GammaPriorCh(theta, prob, d)
LogNormalPriorCh
param <- GammaPriorCh(5, 0.975,1) curve(dgamma(x,shape=param$a,rate=param$b),from=0,to=6,n=1000,ylab="density")
Run the code above in your browser using DataLab