how do I 3D Plot f(x,y,z)=0

Question

I am very new to mathematica and was wondering how I could 3Dplot -5(x-2)-7y+3(z+4)=0 I've tried 3DPlot and Contour but neither have seemed to work. PLease help.

@J.M. it is 2D case but I think it is good enough to be a duplicate, what do you think? How can I plot implicit equations? — Kuba, Jun 03 '16 at 07:51
@Kuba, let's leave it open for now until somebody finds an actual dupe. I have the feeling closing a 3D question as a dupe of a 2D problem is a slippery slope. — J. M.'s missing motivation, Jun 03 '16 at 08:04
for some reason the ContourPlot3D doesn't seem to work on my mathematica — Lorianna Esparza, Jun 03 '16 at 08:54
What version of Mathematica do you have? (Please edit your question to include this information.) — J. M.'s missing motivation, Jun 03 '16 at 09:21

score 2 · Answer 1 · answered Jun 03 '16 at 10:42

I'm on 10.0 for Mac OS X x86 (64-bit) (December 4, 2014)

Plotting a Function see Function Visualization,

ContourPlot3D[-5 (x - 2) - 7 y + 3 (z + 4) == 0, {x, -10, 10}, {y, -10, 10}, {z, -10, 10}]

Adding a plan z an y,

cp1 = ContourPlot3D[{-5 (x - 2) - 7 y + 3 (z + 4) == 0, z, y}
, {x, -10, 10}, {y, -10, 10}, {z, -10, 10}
, ContourStyle -> {Red, Blue, Green}]

Solve for Intersections,

Solve[{-5 (x - 2) - 7 y + 3 (z + 4) == 0 && z == 0 && y == 0, z == 0}, {x, y, z}]

{{x->22/5,y->0,z->0}}

And Visualise the whole gang:

Show[cp1, Graphics3D[{White, Sphere[{22/5, 0, 0}]}]]

score 1 · Answer 2 · answered Jun 03 '16 at 09:03

1

Try the following: first solve with respect to z:

sl = Solve[-5 (x - 2) - 7 y + 3 (z + 4) == 0, z]

(*  {{z -> 1/3 (-22 + 5 x + 7 y)}}  *)

Then plot it in 3D:

Plot3D[sl[[1, 1, 2]], {x, -1, 1}, {y, -1, 1}]

Have fun!

answered Jun 03 '16 at 09:03

Alexei Boulbitch

39,397
2
47
96

how do I 3D Plot f(x,y,z)=0

2 Answers2

Linked

Related