Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Combining ListPlot3D with Show[]

  • To: mathgroup at smc.vnet.net
  • Subject: [mg72241] Re: Combining ListPlot3D with Show[]
  • From: "dimitris" <dimmechan at yahoo.com>
  • Date: Fri, 15 Dec 2006 07:07:05 -0500 (EST)
  • References: <elrb9p$11j$1@smc.vnet.net>

Use the function WireFrame.

First load the package

Graphics`Shapes`

then works as the following example demonstrates:

In[218]:=
Block[{$DisplayFunction = Identity}, p1 = Plot3D[Cos[x*y], {x, -2, 2},
{y, -2, 2}, HiddenSurface -> True];
    p2 = Plot3D[Sin[x*y], {x, -2, 2}, {y, -2, 2}, HiddenSurface ->
False]];
p3 = WireFrame[p2];

In[220]:=
Show[p1, p3, ImageSize -> 600]

Regards
Dimitris


Î?/Î? Luiz Melo έγÏ?αÏ?ε:
> Dear mathgroup,
>
> Given two tables t1 and t2, we set
>
> g1 = ListPlot3D[t1, Mesh -> False, HiddenSurface -> True, ColorFunction ->
> Automatic, DisplayFunction -> Identity];
>
> and
>
> g2 = ListPlot3D[t2, Mesh -> False, HiddenSurface -> False, ColorFunction ->
> Automatic, DisplayFunction -> Identity];
>
> Now combine g1 and g2 with Show:
>
> Show[g1,g2, DisplayFunction -> $DisplayFunction];
>
> Why does the plot g2 is displayed as if its option "HiddenSurface" was "True" ??
>
>
> Thanks in advance,
> Luiz
>
>
> --
> Luiz Melo
> �cole Polytechnique de Montréal
> Département de Génie Physique
> C.P.6079, succ. Centre-ville
> Montréal (QC) Canada
> H3C 3A7
> Tél (514)340-4711-7454
> Fax (514)340-3218


  • Prev by Date: Re: Noob question about definite integration
  • Next by Date: RE: How to plot multiple surface plots each with different domains in
  • Previous by thread: Combining ListPlot3D with Show[]
  • Next by thread: RE: Combining ListPlot3D with Show[]