User Portlet User Portlet

Discussions
Hi everybody! I'm interessed in the behavior near zero of a function depending on a positive parameter"p": Cas2a[\[Phi]_] := Sqrt[-((p + (1 + p) (-1 + (1/(1 + p))^\[Phi]) \[Phi] PolyGamma[ 1, \[Phi]])/(p (1 + p)^2...
Hello Ana Luiza, first, locate the maxima: f[x_, y_] := Exp[-y^2 - x^4/4 + x^2]; Plot3D[f[x, y], {x, -2.5`, 2.5`}, {y, -2.5`, 2.5`}] Zone = Polygon[{{-2.5, -2.5}, {-2.5, 2.5}, {2.5, 2.5}, {2.5, -2.5}}]; Sup1 = ArgMax[f[x, y],...
Hello, this is a question about the transformation of a uniform distribution leading to a "standard" Pareto one. Here are two formulas A and B (densities) resulting from this transformation: A[v_] := (1/D[1/u^(1/a), u]) /. u -> 1/v^a...
Hi Leonid, "assist" works under R installed on my machine: ![enter image description here][1] [1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=Exemple.JPG&userId=422641 It seems the problem stems...
Hello Alex, that's simple: just use the Quantile function Quantile[BetaDistribution[a, b], 0.05]
Hi Henrik, the problem is that your data do not consist in an array. You could try to make an array of the same size (approximatively): f1 = Interpolation[t1] {xmin, xmax} = {300, 1600}; {ymin, ymax} = {320, 375}; and...
Notice first that the problem can be simplified, since function[0, 0]=1, and one can compute K=NIntegrate[LKLH[x, y], {x, -100, 100}, {y, -100, 100}]. Now, we can define, with the same function: Truc[nth_] := nth Exp[-nth]; LKLH[x_, y_]...
Ok, I see. Thanks a lot!
Yes, this is strange! To eliminate complex solutions, you coud compute: Res = Solve[(1 + r)^81 == 1.45, r, Reals] Map[1.45 - (1 + r)^81 /. # &, Res] // Chop which gives r=-1 as a multiple solution and, finally, the correct one :...
I think FindRoot is not the right option in your case. limit[tt_, gamma_] := Solve[((tt)^(1/2) (-250*((tt)^(-3/2) - t^(-3/2)) + 1/(10^3*t^(1/2))) == 1/gamma), {t}]; And then NIntegrate[ gamma*tprime,...