powered by
piridge(alpha, mu1, mu2, Sigma1, Sigma2, showplot=FALSE)
TRUE
alpha
q <- piridge(seq(0,1,0.1),c(1,1),c(2,5),diag(2),diag(2))
Run the code above in your browser using DataLab