powered by
piridge.zeroes(prop, mu1, mu2, Sigma1, Sigma2, alphamin=0, alphamax=1,by=0.001)
alpha
q <- piridge.zeroes(0.2,c(1,1),c(2,5),diag(2),diag(2),by=0.1)
Run the code above in your browser using DataLab