Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'How do I merge 3D graphics?' topicStudent Support Forum > General > "How do I merge 3D graphics?"

< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic
Author Comment/Response
Bill Simpson
05/20/13 1:20pm

In[1]:= elips = ContourPlot3D[x^2 + 2 y^2 + 6 z^2 == 1, {x, -1, 1}, {y, -1, 1}, {z, -0.5, 0.5}];
pBeg = Graphics3D[{PointSize[.05], Point[{1, 2, 3}]}];
pMin = Graphics3D[{PointSize[.05], Point[{0.373, 0.459, 0.271}]}];
pMax = Graphics3D[{PointSize[.05], Point[{-.591, -.456, -.198}]}];
Show[pBeg, pMin, pMax, elips]

Out[5]= ...PlotSnipped...

URL: ,

Subject (listing for 'How do I merge 3D graphics?')
Author Date Posted
How do I merge 3D graphics? MOS was 71331 05/20/13 10:46am
Re: How do I merge 3D graphics? Bill Simpson 05/20/13 1:20pm
Re: Re: How do I merge 3D graphics? MOS was 71331 05/20/13 3:37pm
Re: Re: Re: How do I merge 3D graphics? Bill Simpson 05/21/13 00:08am
< Previous Comment | Next Comment >Help | Reply To Comment | Reply To Topic