Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*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 2004

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

Search the Archive

Re: Combining 2D graphs into a 3D graph

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49413] Re: Combining 2D graphs into a 3D graph
  • From: Bill Rowe <readnewsciv at earthlink.net>
  • Date: Sun, 18 Jul 2004 08:09:22 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

On 7/17/04 at 6:40 AM, suomesta at yahoo.com (Carol Ting) wrote:

>I have many curves in the 2D space, each associated with a specific
>value of parameter n.  (These curves are determined with a somewhat
>complicated process depending on the value of n, so I cannot just
>use one bivariate function to describe this family of curves.)

>Can anyone tell me how to plot these curves in a 3D plot, while
>adding n as the second axis?

>For example, how can I make Mathematica plot the following lines in
>a 3D plot?

>n=1, l1 = Line[{{2, 7}, {3, 9}}] 
>n=2, l2 = Line[{{2, 6}, {3, 8}}]

Try the following:

s = {{2, 7, 1}, {3, 9, 1}}; 
m = {{2, 6, 2}, {3, 8, 2}}; 

<< "Graphics`Graphics3D`"

a = ScatterPlot3D[s, PlotJoined -> True, PlotStyle -> Hue[0], 
    DisplayFunction -> Identity]; 
b = ScatterPlot3D[m, PlotJoined -> True, PlotStyle -> Hue[0.6], 
    DisplayFunction ->  Identity]; 

Show[a, b, DisplayFunction -> $DisplayFunction];
--
To reply via email subtract one hundred and four


  • Prev by Date: Re: Using a Result from NMinimize
  • Next by Date: Re: Combining 2D graphs into a 3D graph
  • Previous by thread: RE: Combining 2D graphs into a 3D graph
  • Next by thread: Re: Combining 2D graphs into a 3D graph