Jtdylktuy

I'm new to Mathematica, and for most purposes the program has served me well and been straightforward. However, I'm hitting a snag while trying to create a contour plot for the distribution function

$qquad f(x,y) = (x,y)^{p-1}/(alpha + beta,x + gamma,y + delta,x,y)^{p + q}$

Notice $x,y$ are variables, and $alpha,beta,gamma,delta, p,$ and $q$ are constants. I need to set a list of assumptions for constants in the function, but my attempts have been fruitless. Every command yields a graph without an image.

I first tried assigning my function with its assumptions by:

Assuming[

  {x > 0, y > 0, p > 0, α > 0, β > 0, γ > 0, δ > 0}, 

  f[x_, y_] := 

    (x*y)^(p - 1)/(α + β*x + γ*y + δ*x*y)^(p + q)] 

After the assignment, I tried plotting with ContourPlot and DensityPlot.

I'll provide just the ContourPlot expression below because not much changes across them:

ContourPlot[f[x, y], {x, 0, 200}, {y, 0, 200}]

In regards to the ContourPlot code, I've changed the domain to both larger and smaller numbers to no avail. Neither ContourPlot nor DensityPlot provides an image. I then try the code without assigning the function beforehand, while including ContourPlot within the Assuming command:

Assuming[

  {α > 0, β > 0, γ > 0, δ > 0, p > 0}, 

  ContourPlot[(x*y)^(p - 1)/(α + β*x + γ*y + δ*x*y)^(p + q), {x, 0, 3}, {y, 0, 3}]]

I know this equation should produce some sort of image since it's simply a type of truncated distribution function. I believe I've narrowed down the issue to one of the following: Mathematica does not allow assumptions to be used with ContourPlot/DensityPlot, the distribution function is too complicated for Mathematica, or my user error is hindering me. My next step is to try creating different plots on the same graph for various pre-determined values of the parameters.

Any help is much appreciated. As previously mentioned, I'm not very experienced with Mathematica, so I'm more than willing to learn something new or help further explain my goals.

As has been said in the comments to your question, because all plotting functions are based on strictly numerical calculations, you must give definite values to all six parameters. If you are in the position where you have no good idea how the function behaves as the parameters vary, you can explore the situation with Manipulate. Here is an example.

f[α_, β_, γ_, δ_, p_, q_][x_, y_] := (x y)^(p - 1)/(α + β x + γ y + δ x y)^(p + q)



With[{ϵ = .0001},

  Manipulate[

    ContourPlot[f[α, β, γ, δ, p, q][x, y], {x, 0, 2}, {y, 0, 2}],

    {α, ϵ, 1, Appearance -> "Labeled"},

    {β, ϵ, 1, Appearance -> "Labeled"},

    {γ, ϵ, 1, Appearance -> "Labeled"},

    {δ, ϵ, 1, Appearance -> "Labeled"},

    {p, 1, 4, 1, Appearance -> "Labeled"},

    {q, 1, 4, 1, Appearance -> "Labeled"}]]

Note: I have no clue about what comprise good ranges for either the parameters or the variables. I made some simple assumptions about them. You should revise these assumptions to suit your needs.

One way is to simply set the constants as variables in your function definition, and then set them to the values you want when you call the function:

f[x_, y_, α_, β_, γ_, δ_, p_, q_] := (x y)^(p -1)/(α + β x + γ y + δ x y)^(p + q);



ContourPlot[f[x, y, 2, 3, 4, 5, .5, .5], {x, 0, 200}, {y, 0, 200}]