-2
$\begingroup$

The surface I want to plot is $z^2 + r^2 = 25\, \theta$.

Please tell me how to do it in Mathematica.

Improve this question
$\endgroup$
4
  • $\begingroup$ ContourPlot3D? $\endgroup$
    – Henrik Schumacher
    Commented Nov 19, 2018 at 17:05
  • $\begingroup$ @Henrik Schumacher How would you write the function? $\endgroup$
    – Brandon
    Commented Nov 19, 2018 at 18:17
  • 1
    $\begingroup$ That depends. What is $z$, $r$, $\theta$? I guess you try to express an equation in cylindrical coordinates... but who knows? $\endgroup$
    – Henrik Schumacher
    Commented Nov 19, 2018 at 18:20
  • $\begingroup$ See, for instance, the first example in TransformedField. You can then apply ContourPlot3D[Evaluate@TransformedField[..],...] $\endgroup$
    – Michael E2
    Commented Nov 22, 2018 at 19:50

1 Answer 1

Reset to default
2
$\begingroup$

Brandon: You could modify the example given in: How do I make a 3DPlot using cylindrical coordinates? as follows:

cylinderPlot3D[f_, {rMin_, rMax_}, {\[Theta]Min_, \[Theta]Max_},opts___] :=ParametricPlot3D[{r Cos[\[Theta]], r Sin[\[Theta]],f[r, \[Theta]]}, {r, rMin, rMax}, {\[Theta], \[Theta]Min, \[Theta]Max}, opts]

g[r_, \[Theta]_] := Sqrt[25 \[Theta] - r^2];

cylinderPlot3D[g, {0, 1}, {0, 2 Pi}, Mesh -> None, Boxed -> True]
Improve this answer
$\endgroup$

Not the answer you're looking for? Browse other questions tagged or ask your own question.