Register to reply

Help with plotting in Mathematica

by Gili
Tags: mathematica, plotting
Share this thread:
Gili
#1
Dec6-06, 02:35 AM
P: 5
Hello,
I could use some help with plotting.
I need to plot the intersection of three cylinders:
x^2+y^2=1
z^2+x^2=1
y^2+z^2=1

it's really hard to visualize how this shape looks like, and I need to plot it.
I was told that I should use Mathematica, but I'm not too familiar with all the options there...

can anyone help me?
thanks,
Gili
Phys.Org News Partner Science news on Phys.org
World's largest solar boat on Greek prehistoric mission
Google searches hold key to future market crashes
Mineral magic? Common mineral capable of making and breaking bonds
Gili
#2
Dec6-06, 02:39 AM
P: 5
Quote Quote by Gili View Post
Hello,
I could use some help with plotting.
I need to plot the intersection of three cylinders:
x^2+y^2=1
z^2+x^2=1
y^2+z^2=1

it's really hard to visualize how this shape looks like, and I need to plot it.
I was told that I should use Mathematica, but I'm not too familiar with all the options there...

can anyone help me?
thanks,
Gili
I will be more specific: I need to plot the faces of the set:
{ (x,y,z): x^2+y^2<=1 and z^2+x^2<=1 and y^2+z^2<=1 }
Alistair
#3
Dec6-06, 02:42 AM
P: 9
these three shapes on the same graph would look like 3 circles with their centres at the origin on 3 differend planes. we'll start with x^2+y^2=1. this is your normal 2d circle. then super imposed on this is z^2+x^2=1, this is the same shape except it is rotated around the x axis. y^2+z^2=1 is similar to this except it is rotated around the Y axis. im pretty sure that is right but im not guaranteeing anything. you should end up with something resembling a very crude wire frame of a sphere hope it helped a bit.

PS the radius of these circles is 1. (i think)

Gili
#4
Dec6-06, 02:44 AM
P: 5
Help with plotting in Mathematica

Quote Quote by Alistair View Post
these three shapes on the same graph would look like 3 circles with their centres at the origin on 3 differend planes. we'll start with x^2+y^2=1. this is your normal 2d circle. then super imposed on this is z^2+x^2=1, this is the same shape except it is rotated around the x axis. y^2+z^2=1 is similar to this except it is rotated around the Y axis. im pretty sure that is right but im not guaranteeing anything. hope it helped a bit.

PS the radius of these circles is 1. (i think)
Hi, I need a three dimensional plot..
Alistair
#5
Dec6-06, 02:46 AM
P: 9
hmmmm. sorry cant help you there. i dont know af any programs that would allow you to do that. sorry. try posting this in the mathematics forum. Auto Cad might be able to help get the picture.
chroot
#6
Dec6-06, 03:00 AM
Emeritus
Sci Advisor
PF Gold
chroot's Avatar
P: 10,429
Do you need to plot, just because you're having a hard time visualizing it? Or is plotting it actually part of the assignment?

You can certainly write a program in Mathematica to display such a thing, but I don't think it would be easy, at all.

You may want to look at the Graphics3D function, which can render arbitrary 3D shapes. See section 2.10.8 of the Mathematica Book from within Mathematica's Help window. Unfortunately, I don't see any cylinder primitives, but you might be able to make something decent out of it.

- Warren
Gili
#7
Dec6-06, 03:45 AM
P: 5
Quote Quote by chroot View Post
Do you need to plot, just because you're having a hard time visualizing it? Or is plotting it actually part of the assignment?

You can certainly write a program in Mathematica to display such a thing, but I don't think it would be easy, at all.

You may want to look at the Graphics3D function, which can render arbitrary 3D shapes. See section 2.10.8 of the Mathematica Book from within Mathematica's Help window. Unfortunately, I don't see any cylinder primitives, but you might be able to make something decent out of it.

- Warren
tried that...
I still don't know how to do it...
anyone?
radou
#8
Dec6-06, 03:51 AM
HW Helper
radou's Avatar
P: 3,224
Try using :

Show[Graphics3D[shape]]

A possible shape is a cylinder, in the form:

Cylinder[r, h, n]

where r is the radius, h the height, and n the number of polygons used to draw it.
chroot
#9
Dec6-06, 03:58 AM
Emeritus
Sci Advisor
PF Gold
chroot's Avatar
P: 10,429
radou,

Cylinder is a 2D, not 3D, graphics primitive. That won't work, unfortunately.

- Warren
radou
#10
Dec6-06, 04:02 AM
HW Helper
radou's Avatar
P: 3,224
Quote Quote by chroot View Post
radou,

Cylinder is a 2D, not 3D, graphics primitive. That won't work, unfortunately.

- Warren
Uhh, too bad. Hadn't had the time to try it out right now.
radou
#11
Dec6-06, 04:08 AM
HW Helper
radou's Avatar
P: 3,224
Btw, tried it out, worked just fine. Can draw sets of cylinders with parallel axis only, though, which doesn't help Gili, unfortunately.

Edit: this should be more useful:http://forums.wolfram.com/mathgroup/.../msg00287.html.
FredGarvin
#12
Dec6-06, 06:55 AM
Sci Advisor
FredGarvin's Avatar
P: 5,095
It looks like you would have to use ParametricPlot for this. I'd have to play around with setting all three equations equal to each other to actually plot the intersection.
Nialsh
#13
Dec29-09, 11:07 AM
P: 1
Time to dig up an old thread. I just got Mathematica and I've been trying to learn it using Google. This was one of the first results. So for the benefit of other searchers, I'll post the answer I found.

First, treating the cylinders as hollow shells (x^2+y^2=1 vs x^2+y^2<1) yields 8 points. Not very interesting.
Solve[x^2 + y^2 == 1 && x^2 + z^2 == 1 && y^2 + z^2 == 1, {x, y, z}]
If you treat them as solids, you get a cool sphere-like thing.
RegionPlot3D[
 x^2 + y^2 <= 1 && x^2 + z^2 <= 1 && y^2 + z^2 <= 1,
 {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, PlotPoints -> 80, Mesh -> None]
pandarean
#14
Oct8-11, 05:08 PM
P: 2
Nialsh I love you


Register to reply

Related Discussions
Plotting in Mathematica Math & Science Software 9
Plotting in Mathematica Math & Science Software 6
Plotting data in mathematica Math & Science Software 12
Mathematica Plotting Question Math & Science Software 2
Help with plotting in Mathematica Math & Science Software 1