The Math Forum

Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Math Forum » Discussions » Inactive » comp.soft-sys.math.mathematica

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: Revealing HiddenSurfaces
Replies: 0  

Advanced Search

Back to Topic List Back to Topic List  
David Smith

Posts: 5
Registered: 12/11/04
Revealing HiddenSurfaces
Posted: Jul 17, 1996 1:48 AM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

Could someone help on this? Thanks.

I want to plot two things in a single 3D graph. One thing is just a
surface which I can do easily enough as ...

model = Plot3D[(x + y)/2,
{x,0,25},{y,0,25}, PlotPoints -> 2,
Shading -> False,
HiddenSurface -> False]

where I can see the hidden surface. Superimposed on this I wanted data points
(where the Œerror¹ distance between each data point and the model surface
is shown by a vertical line). I did this in two steps. First make the
error lines with the example set ...

data = Show[Graphics3D[{Line[{{0,1.97,0.98},{0,1.97,0.99}}],
Axes -> True]]

Finally plot everything together.

Show[data, model, Shading -> False]

The problem is that I¹m unable to make the model surface transparent so
that I can see the error lines of the data points behind the surface.
Unfortunately Graphics3D doesn¹t have a HiddenSurface option (Plot3D and
Show do). Is there some way of doing this (maybe converting data to some
other kind of graphics object)? This has been bugging me and I would
really appreciate some pointers. Thanks.


Point your RSS reader here for a feed of the latest messages in this topic.

[Privacy Policy] [Terms of Use]

© The Math Forum at NCTM 1994-2018. All Rights Reserved.