lnPareto=function(mu,sigma,seuil,alpha,x) { #Densité de la loi composée log-normale / Pareto if (x