I have the following function:
I need to plot a 3-D with coordinates f (p, q), p and q. I mean, I enter values for p and q, so that the integral of f (p, q) must be a number. This number must be placed in a coordinate axis and their respective points p and q must be palced in the other two coordinates axes to generate a point (in the 3-D space). Variables p and q range from minus infinity to plus infinity.
I've tried to solve the problem this way:
However, I didn't succeed. Mathematica does not accept the limit 1-z of the integral. Also, it does accept the varying values of p and q. What can I do to solve this problem?
Thank you in advance.
Thanks a lot, you helped me so much. But I have another question. When I tried to plot the imaginary part too, I didn't succeed, why? Notice that when I plot with the variation of p and q which range from -Sqrt2 up to Sqrt2, the graphic is ploted:
F[p_, q_] := NIntegrate[1/(q^2 y (1 - y) + p^2 z (1 - z) - 1), {z, 0, 1}, {y, 0, 1 - z}]
GraphicsGrid[{{Plot3D[
Im[F[p, q]], {p, -Sqrt[2], Sqrt[2]}, {q, -Sqrt[2], Sqrt[2]}, AxesLabel -> {p, q, F}],
Plot3D[Re[F[p, q]], {p, -Sqrt[2], Sqrt[2]}, {q, -Sqrt[2], Sqrt[2]},
AxesLabel -> {p, q, F}]}}]
But how can I increase the range of p and q?